summaryrefslogtreecommitdiff
path: root/lisp/buff-menu.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/buff-menu.el')
-rw-r--r--lisp/buff-menu.el10
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)