From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 25 Jan 1996 00:56:54 +0000 (+0000)
Subject: (server-process-filter): Pass proper format string to message.
X-Git-Tag: emacs-19.34~1533
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=26544100fa650d01438291943b9e1c1e46258aab;p=emacs.git

(server-process-filter): Pass proper format string to message.
---

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)))