Mercurial > emacs
changeset 47018:101eb25eab6d
(Fcall_process): Remove /: from program name.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sat, 24 Aug 2002 03:14:32 +0000 |
parents | 0ba62d75345e |
children | 8ec5fd232f26 |
files | src/callproc.c |
diffstat | 1 files changed, 7 insertions(+), 0 deletions(-) [+] |
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) {