diff options
| author | Glenn Morris | 2009-01-09 04:29:16 +0000 |
|---|---|---|
| committer | Glenn Morris | 2009-01-09 04:29:16 +0000 |
| commit | 61a846fbec62231eb19bdd41e08fd89f57787195 (patch) | |
| tree | 54ec9efa859bd43dee96e35d4cde7250e4da7f89 /lisp/net | |
| parent | 51bc9aff5ed6323b80d7c76f7e326a656f2f56b8 (diff) | |
| download | emacs-61a846fbec62231eb19bdd41e08fd89f57787195.tar.gz emacs-61a846fbec62231eb19bdd41e08fd89f57787195.zip | |
Replace last-command-char with last-command-event.
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/tramp.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index b226f22ad98..dbd34b76359 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el | |||
| @@ -3738,10 +3738,10 @@ beginning of local filename are not substituted." | |||
| 3738 | ;; We don't need to handle `last-input-event', because | 3738 | ;; We don't need to handle `last-input-event', because |
| 3739 | ;; due to the key map we know it must be ?/ or ?~. | 3739 | ;; due to the key map we know it must be ?/ or ?~. |
| 3740 | (let ((s (concat (buffer-substring (point-min) (point)) | 3740 | (let ((s (concat (buffer-substring (point-min) (point)) |
| 3741 | (string last-command-char)))) | 3741 | (string last-command-event)))) |
| 3742 | (delete-region (point-min) (point)) | 3742 | (delete-region (point-min) (point)) |
| 3743 | (insert (substitute-in-file-name s)) | 3743 | (insert (substitute-in-file-name s)) |
| 3744 | (setq ad-return-value last-command-char)) | 3744 | (setq ad-return-value last-command-event)) |
| 3745 | ad-do-it)))) | 3745 | ad-do-it)))) |
| 3746 | 3746 | ||
| 3747 | '(minibuffer-electric-separator | 3747 | '(minibuffer-electric-separator |