Mercurial > emacs

diff src/callproc.c @ 47018:101eb25eab6d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fcall_process): Remove /: from program name.
author Richard M. Stallman <rms@gnu.org>
date Sat, 24 Aug 2002 03:14:32 +0000
parents 4173dcd87832
children 23a1cea22d13
line wrap: on
line diff
--- a/src/callproc.c	Sat Aug 24 03:00:29 2002 +0000
+++ b/src/callproc.c	Sat Aug 24 03:14:32 2002 +0000
@@ -389,6 +389,13 @@
       emacs_close (filefd);
       report_file_error ("Searching for program", Fcons (args[0], Qnil));
     }
+
+  /* If program file name starts with /: for quoting a magic name,
+     discard that.  */
+  if (SBYTES (path) > 2 && SREF (path, 0) == '/'
+      && SREF (path, 1) == ':')
+    path = Fsubstring (path, make_number (2), Qnil);
+
   new_argv[0] = SDATA (path);
   if (nargs > 4)
     {