mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-12 16:23:57 +00:00
(quote_file_name): Quote with &, not \.
Quote `-' only at start of file name. Terminate the value string.
This commit is contained in:
parent
e5446a46ef
commit
f1db6a73ef
@ -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;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user