Mercurial > emacs
changeset 16401:249f797c3750
(Buffer-menu-revert): New function.
(Buffer-menu-mode-map): Use Buffer-menu-revert for g.
(Buffer-menu-mode): Doc fix.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 07 Oct 1996 17:52:50 +0000 |
parents | 9a39893d9861 |
children | 3608b4a0c460 |
files | lisp/buff-menu.el |
diffstat | 1 files changed, 8 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/buff-menu.el Mon Oct 07 16:10:14 1996 +0000 +++ b/lisp/buff-menu.el Mon Oct 07 17:52:50 1996 +0000 @@ -91,7 +91,7 @@ (define-key Buffer-menu-mode-map "m" 'Buffer-menu-mark) (define-key Buffer-menu-mode-map "t" 'Buffer-menu-visit-tags-table) (define-key Buffer-menu-mode-map "%" 'Buffer-menu-toggle-read-only) - (define-key Buffer-menu-mode-map "g" 'revert-buffer) + (define-key Buffer-menu-mode-map "g" 'Buffer-menu-revert) (define-key Buffer-menu-mode-map [mouse-2] 'Buffer-menu-mouse-select) ) @@ -123,7 +123,8 @@ \\[Buffer-menu-unmark] -- remove all kinds of marks from current line. With prefix argument, also move up one line. \\[Buffer-menu-backup-unmark] -- back up a line and remove marks. -\\[Buffer-menu-toggle-read-only] -- toggle read-only status of buffer on this line." +\\[Buffer-menu-toggle-read-only] -- toggle read-only status of buffer on this line. +\\[Buffer-menu-revert] -- update the list of buffers." (kill-all-local-variables) (use-local-map Buffer-menu-mode-map) (setq major-mode 'Buffer-menu-mode) @@ -134,6 +135,11 @@ (setq buffer-read-only t) (run-hooks 'buffer-menu-mode-hook)) +(defun Buffer-menu-revert () + "Update the list of buffers." + (interactive) + (revert-buffer)) + (defun Buffer-menu-revert-function (ignore1 ignore2) (list-buffers))