summaryrefslogtreecommitdiff
path: root/lisp/buff-menu.el
diff options
context:
space:
mode:
authorRoland McGrath <roland@gnu.org>1992-07-02 02:36:29 +0000
committerRoland McGrath <roland@gnu.org>1992-07-02 02:36:29 +0000
commit13e8cb56b7c104b50e3e4cb306653dcd7be3bd11 (patch)
tree86dddd0b5737da85ac7c3a5e344529703cdd9adb /lisp/buff-menu.el
parent22934e5b34604d051605caf84790441799131736 (diff)
downloademacs-13e8cb56b7c104b50e3e4cb306653dcd7be3bd11.tar.gz
*** empty log message ***
Diffstat (limited to 'lisp/buff-menu.el')
-rw-r--r--lisp/buff-menu.el12
1 files changed, 10 insertions, 2 deletions
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el
index 371bb586d80..6682f42c682 100644
--- a/lisp/buff-menu.el
+++ b/lisp/buff-menu.el
@@ -1,12 +1,12 @@
;;; buff-menu.el --- buffer menu main function and support functions.
-;; Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc.
+;; Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc.
;; This file is part of GNU Emacs.
;; GNU Emacs is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
-;; the Free Software Foundation; either version 1, or (at your option)
+;; the Free Software Foundation; either version 2, or (at your option)
;; any later version.
;; GNU Emacs is distributed in the hope that it will be useful,
@@ -33,6 +33,7 @@
(define-key Buffer-menu-mode-map "1" 'Buffer-menu-1-window)
(define-key Buffer-menu-mode-map "f" 'Buffer-menu-this-window)
(define-key Buffer-menu-mode-map "o" 'Buffer-menu-other-window)
+ (define-key Buffer-menu-mode-map "\C-o" 'Buffer-menu-switch-other-window)
(define-key Buffer-menu-mode-map "s" 'Buffer-menu-save)
(define-key Buffer-menu-mode-map "d" 'Buffer-menu-delete)
(define-key Buffer-menu-mode-map "k" 'Buffer-menu-delete)
@@ -66,6 +67,7 @@ Letters do not insert themselves; instead, they are commands.
\\[Buffer-menu-this-window] -- select that buffer in place of the buffer menu buffer.
\\[Buffer-menu-other-window] -- select that buffer in another window,
so the buffer menu buffer remains visible in its window.
+\\[Buffer-menu-switch-other-window] -- switch the other window to this buffer.
\\[Buffer-menu-visit-tags-table] -- visit-tags-table this buffer.
\\[Buffer-menu-not-modified] -- clear modified-flag on that buffer.
\\[Buffer-menu-save] -- mark that buffer to be saved, and move down.
@@ -274,6 +276,12 @@ You can mark buffers with the \\<Buffer-menu-mode-map>\\[Buffer-menu-mark] comma
(interactive)
(switch-to-buffer-other-window (Buffer-menu-buffer t)))
+(defun Buffer-menu-switch-other-window ()
+ "Make the other window select this line's buffer.
+The current window remains selected."
+ (interactive)
+ (display-buffer (Buffer-menu-buffer t)))
+
(defun Buffer-menu-2-window ()
"Select this line's buffer, with previous buffer in second window."
(interactive)