Mercurial > emacs
diff src/callint.c @ 90127:30ad2795fdab
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-28
Merge from emacs--cvs-trunk--0
Patches applied:
* emacs--cvs-trunk--0 (patch 180-191)
- Update from CVS
- Merge from gnus--rel--5.10
* gnus--rel--5.10 (patch 39-44)
- Merge from emacs--cvs-trunk--0
- Update from CVS
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sat, 19 Mar 2005 02:42:17 +0000 |
parents | f2ebccfa87d4 046708b92d49 |
children | f9a65d7ebd29 |
line wrap: on
line diff
--- a/src/callint.c Wed Mar 16 21:23:11 2005 +0000 +++ b/src/callint.c Sat Mar 19 02:42:17 2005 +0000 @@ -98,6 +98,7 @@ This skips events that are integers or symbols. f -- Existing file name. F -- Possibly nonexistent file name. +G -- Possibly nonexistent file name, defaulting to just directory name. i -- Ignored, i.e. always nil. Does not do I/O. k -- Key sequence (downcase the last event if needed to get a definition). K -- Key sequence to be redefined (do not downcase the last event). @@ -605,6 +606,12 @@ Qnil, Qnil, Qnil, Qnil, Qnil); break; + case 'G': /* Possibly nonexistent file name, + default to directory alone. */ + args[i] = Fread_file_name (build_string (callint_message), + Qnil, Qnil, Qnil, build_string (""), Qnil); + break; + case 'i': /* Ignore an argument -- Does not do I/O */ varies[i] = -1; break;