diff options
| author | Richard M. Stallman | 1993-06-15 23:11:38 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-06-15 23:11:38 +0000 |
| commit | 01906bcac94f42eb470455ed0cdb52a62df63e29 (patch) | |
| tree | ad98cb7d2cba423a68e45f37eb01e4af9f5de5fa | |
| parent | fce222c7f0c7f5d2e90bc5a1f5991b4a7b65e616 (diff) | |
| download | emacs-01906bcac94f42eb470455ed0cdb52a62df63e29.tar.gz emacs-01906bcac94f42eb470455ed0cdb52a62df63e29.zip | |
(server-process-filter): Use server-switch-buffer.
| -rw-r--r-- | lisp/server.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/server.el b/lisp/server.el index 3e9ddcd0c82..1084aee4093 100644 --- a/lisp/server.el +++ b/lisp/server.el | |||
| @@ -188,7 +188,7 @@ Prefix arg means just kill any existing server communications subprocess." | |||
| 188 | (server-visit-files files client) | 188 | (server-visit-files files client) |
| 189 | ;; CLIENT is now a list (CLIENTNUM BUFFERS...) | 189 | ;; CLIENT is now a list (CLIENTNUM BUFFERS...) |
| 190 | (setq server-clients (cons client server-clients)) | 190 | (setq server-clients (cons client server-clients)) |
| 191 | (switch-to-buffer (nth 1 client)) | 191 | (server-switch-buffer (nth 1 client)) |
| 192 | (run-hooks 'server-switch-hook) | 192 | (run-hooks 'server-switch-hook) |
| 193 | (message (substitute-command-keys | 193 | (message (substitute-command-keys |
| 194 | "When done with a buffer, type \\[server-edit]."))))) | 194 | "When done with a buffer, type \\[server-edit]."))))) |