aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1993-03-06 06:10:05 +0000
committerRichard M. Stallman1993-03-06 06:10:05 +0000
commitbfd72d065f00149129866d90a774f0e58d64f6d5 (patch)
tree3a6f82b0e4f0ee4cee40a7a53a9ae9ec4335389d
parentd654e8ce599567b96d4e04f6b12a6353dacfd00f (diff)
downloademacs-bfd72d065f00149129866d90a774f0e58d64f6d5.tar.gz
emacs-bfd72d065f00149129866d90a774f0e58d64f6d5.zip
(emerge-show-file-name): Handle any kind of event.
-rw-r--r--lisp/emerge.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emerge.el b/lisp/emerge.el
index 2309c6db93a..09c29fbb680 100644
--- a/lisp/emerge.el
+++ b/lisp/emerge.el
@@ -2908,8 +2908,8 @@ SPC, it is ignored; if it is anything else, it is processed as a command."
2908 (while (and (not (pos-visible-in-window-p)) 2908 (while (and (not (pos-visible-in-window-p))
2909 (> (1- (frame-height)) (window-height))) 2909 (> (1- (frame-height)) (window-height)))
2910 (enlarge-window 1)) 2910 (enlarge-window 1))
2911 (let ((c (read-char))) 2911 (let ((c (read-event)))
2912 (if (/= c 32) 2912 (if (not (eq c 32))
2913 (setq unread-command-events (list c))))))))) 2913 (setq unread-command-events (list c)))))))))
2914 2914
2915;; Improved auto-save file names. 2915;; Improved auto-save file names.