diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-07-02 17:01:41 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-07-02 17:01:41 +0000 |
commit | fc7323e644ca99578784ca195a30e118a8d0994b (patch) | |
tree | 5d40664bab034f2f0bba0781b82a8d7285b866a7 /lisp/ebuff-menu.el | |
parent | a6e68e6c2c0ab04d095531cc8d5f833e99a36add (diff) | |
download | emacs-fc7323e644ca99578784ca195a30e118a8d0994b.tar.gz |
(electric-buffer-list): Change prompt message.
(electric-buffer-menu-mode-map): Define C-m like space.
Diffstat (limited to 'lisp/ebuff-menu.el')
-rw-r--r-- | lisp/ebuff-menu.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ebuff-menu.el b/lisp/ebuff-menu.el index 960d74b5f13..bdbd77e5c40 100644 --- a/lisp/ebuff-menu.el +++ b/lisp/ebuff-menu.el @@ -63,7 +63,7 @@ Calls value of `electric-buffer-menu-mode-hook' on entry if non-nil. (Electric-buffer-menu-mode) (setq select (catch 'electric-buffer-menu-select - (message "<<< Press Space to bury the buffer list >>>") + (message "<<< Press Return to bury the buffer list >>>") (if (eq (setq unread-command-events (list (read-event))) ?\ ) (progn (setq unread-command-events nil) @@ -165,6 +165,7 @@ electric-buffer-menu-mode-hook if it is non-nil." (define-key map "\C-]" 'Electric-buffer-menu-quit) (define-key map "q" 'Electric-buffer-menu-quit) (define-key map " " 'Electric-buffer-menu-select) + (define-key map "\C-m" 'Electric-buffer-menu-select) (define-key map "\C-l" 'recenter) (define-key map "s" 'Buffer-menu-save) (define-key map "d" 'Buffer-menu-delete) |