diff options
| author | Richard M. Stallman <rms@gnu.org> | 1998-03-08 00:19:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1998-03-08 00:19:56 +0000 |
| commit | 68e6f0948b07031692b4244ef60dfa0c6f29c9b3 (patch) | |
| tree | 2ce0056e8ade4549e6e2ee6fb002ec728bdd31d4 /lisp/buff-menu.el | |
| parent | 44071d6b2ca7de02160903e46d47e9037acd7627 (diff) | |
| download | emacs-68e6f0948b07031692b4244ef60dfa0c6f29c9b3.tar.gz | |
(Buffer-menu-quit): Function deleted.
(Buffer-menu-mode-map): Use quit-window for q.
Diffstat (limited to 'lisp/buff-menu.el')
| -rw-r--r-- | lisp/buff-menu.el | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index 2b187a2bf1a..9990fdb760e 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -67,7 +67,7 @@ () (setq Buffer-menu-mode-map (make-keymap)) (suppress-keymap Buffer-menu-mode-map t) - (define-key Buffer-menu-mode-map "q" 'Buffer-menu-quit) + (define-key Buffer-menu-mode-map "q" 'quit-window) (define-key Buffer-menu-mode-map "v" 'Buffer-menu-select) (define-key Buffer-menu-mode-map "2" 'Buffer-menu-2-window) (define-key Buffer-menu-mode-map "1" 'Buffer-menu-1-window) @@ -184,14 +184,6 @@ Type q immediately to make the buffer menu go away." (message "Commands: d, s, x, u; f, o, 1, 2, m, v; ~, %%; q to quit; ? for help.")) -(defun Buffer-menu-quit () - "Quit the buffer menu." - (interactive) - (let ((buffer (current-buffer))) - ;; Switch away from the buffer menu and bury it. - (switch-to-buffer (other-buffer)) - (bury-buffer buffer))) - (defun Buffer-menu-mark () "Mark buffer on this line for being displayed by \\<Buffer-menu-mode-map>\\[Buffer-menu-select] command." (interactive) |