From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 2 Sep 1996 17:43:32 +0000 (+0000)
Subject: (quote_file_name): Quote with &, not \.
X-Git-Tag: emacs-20.1~3870
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f1db6a73ef6352c17393680e6d0b6980294aec68;p=emacs.git

(quote_file_name): Quote with &, not \.
Quote `-' only at start of file name.  Terminate the value string.
---

diff --git a/lib-src/emacsclient.c b/lib-src/emacsclient.c
index 12c6b66040c..4d8037dea67 100644
--- a/lib-src/emacsclient.c
+++ b/lib-src/emacsclient.c
@@ -104,8 +104,8 @@ print_help_and_exit ()
   exit (1);
 }
 
-/* Return a copy of NAME, inserting a \
-   before each \, each -, and each space.
+/* Return a copy of NAME, inserting a &
+   before each &, each space, and any initial -.
    Change spaces to underscores, too, so that the
    return value never contains a space.  */
 
@@ -122,17 +122,18 @@ quote_file_name (name)
     {
       if (*p == ' ')
 	{
-	  *q++ = '\\';
+	  *q++ = '&';
 	  *q++ = '_';
 	  p++;
 	}
       else
 	{
-	  if (*p == '\\' || *p == '-')
-	    *q++ = '\\';
+	  if (*p == '&' || (*p == '-' && p == name))
+	    *q++ = '&';
 	  *q++ = *p++;
 	}
     }
+  *q++ = 0;
 
   return copy;
 }