diff options
| -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 ccd20026c97..5dc51cb7e39 100644 --- a/lisp/server.el +++ b/lisp/server.el @@ -191,7 +191,7 @@ Prefix arg means just kill any existing server communications subprocess." ;; Remove this line from STRING. (setq string (substring string (match-end 0))) (if (string-match "^Error: " request) - (message (concat "Server error: " (substring request (match-end 0)))) + (message "Server error: %s" (substring request (match-end 0))) (if (string-match "^Client: " request) (progn (setq request (substring request (match-end 0))) |