diff options
author | Jim Blandy <jimb@redhat.com> | 1992-11-16 01:33:17 +0000 |
---|---|---|
committer | Jim Blandy <jimb@redhat.com> | 1992-11-16 01:33:17 +0000 |
commit | 4b43edddc036e90dd2c4f430d644fda57b938d60 (patch) | |
tree | 6f88eafad28885c278c941f6dfbd316fb43dac2d /lisp/emerge.el | |
parent | ee4b6d4c618a48c0bc301ba01dde89893f097713 (diff) | |
download | emacs-4b43edddc036e90dd2c4f430d644fda57b938d60.tar.gz |
* bytecomp.el: Declare unread-command-char an obsolete variable.
* vip.el (vip-escape-to-emacs, vip-prefix-arg-value,
vip-prefix-arg-com): Use unread-command-event instead of
unread-command-char; respect its new semantics.
* emerge.el (emerge-show-file-name): Same.
Diffstat (limited to 'lisp/emerge.el')
-rw-r--r-- | lisp/emerge.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/emerge.el b/lisp/emerge.el index e3c06979100..e70bf3969c6 100644 --- a/lisp/emerge.el +++ b/lisp/emerge.el @@ -2065,7 +2065,7 @@ With prefix argument, puts mark before, point after." Use C-u l to reset the windows afterward." (interactive) (delete-other-windows) - (let ((temp-buffer-show-hook + (let ((temp-buffer-show-function (function (lambda (buf) (split-window-vertically) (switch-to-buffer buf) @@ -2476,9 +2476,9 @@ been edited." ((= c ?b) (insert-buffer-substring emerge-B-buffer B-begin B-end)) ((= c ?%) - (insert ?%) - (t - (insert c))))) + (insert ?%)) + (t + (insert c)))) (insert c))) (setq i (1+ i)))) (goto-char merge-begin) @@ -2910,7 +2910,7 @@ SPC, it is ignored; if it is anything else, it is processed as a command." (enlarge-window 1)) (let ((c (read-char))) (if (/= c 32) - (setq unread-command-char c)))))))) + (setq unread-command-event c)))))))) ;; Improved auto-save file names. ;; This function fixes many problems with the standard auto-save file names: |