# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 841686236 0
# Node ID 1fd0ed653ce617b8bf4c06bb5eb5312f823d726f
# Parent  25cfff7ffced08ac12ad04a5a212373dd0edf250
(server-process-filter): Quote with &, not \.

diff -r 25cfff7ffced -r 1fd0ed653ce6 lisp/server.el
--- a/lisp/server.el	Mon Sep 02 17:43:32 1996 +0000
+++ b/lisp/server.el	Mon Sep 02 17:43:56 1996 +0000
@@ -212,11 +212,11 @@
 		      (setq pos 0)
 		      ;; Undo the quoting that emacsclient does
 		      ;; for certain special characters.
-		      (while (string-match "\\\\." arg pos)
+		      (while (string-match "&." arg pos)
 			(setq pos (1+ (match-beginning 0)))
 			(let ((nextchar (aref arg pos)))
-			  (cond ((= nextchar ?\\)
-				 (setq arg (replace-match "\\" t t arg)))
+			  (cond ((= nextchar ?&)
+				 (setq arg (replace-match "&" t t arg)))
 				((= nextchar ?-)
 				 (setq arg (replace-match "-" t t arg)))
 				(t