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:
parent
51bc9aff5e
commit
61a846fbec
5 changed files with 9 additions and 6 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue