1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

Replace last-command-char with last-command-event.

This commit is contained in:
Glenn Morris 2009-01-09 04:29:16 +00:00
parent 51bc9aff5e
commit 61a846fbec
5 changed files with 9 additions and 6 deletions

View file

@ -3738,10 +3738,10 @@ beginning of local filename are not substituted."
;; We don't need to handle `last-input-event', because
;; due to the key map we know it must be ?/ or ?~.
(let ((s (concat (buffer-substring (point-min) (point))
(string last-command-char))))
(string last-command-event))))
(delete-region (point-min) (point))
(insert (substitute-in-file-name s))
(setq ad-return-value last-command-char))
(setq ad-return-value last-command-event))
ad-do-it))))
'(minibuffer-electric-separator