Mercurial > hg > xemacs-beta

comparison lisp/buff-menu.el @ 538:56d2a7dcb919

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2001-05-14 09:51:46 by adrian] [PATCH] Possible fix for mouse-track-insert in 21.[1245], Please Test! <sniaxhsv.fsf@rapier.ecf.teradyne.com>
author adrian
date Mon, 14 May 2001 09:51:47 +0000
parents 1ccc32a20af4
children 0f4bdbb07414
comparison
equal deleted inserted replaced
537:836d476763d0 538:56d2a7dcb919
138 (setq mode-name "Buffer Menu") 138 (setq mode-name "Buffer Menu")
139 (make-local-variable 'revert-buffer-function) 139 (make-local-variable 'revert-buffer-function)
140 (setq revert-buffer-function 'Buffer-menu-revert-function) 140 (setq revert-buffer-function 'Buffer-menu-revert-function)
141 (setq truncate-lines t) 141 (setq truncate-lines t)
142 (setq buffer-read-only t) 142 (setq buffer-read-only t)
143 (make-local-variable 'mouse-track-click-hook) ; XEmacs
144 (add-hook 'mouse-track-click-hook 'Buffer-menu-maybe-mouse-select) ; XEmacs 143 (add-hook 'mouse-track-click-hook 'Buffer-menu-maybe-mouse-select) ; XEmacs
145 (run-hooks 'buffer-menu-mode-hook)) 144 (run-hooks 'buffer-menu-mode-hook))
146 145
147 (defun Buffer-menu-revert-function (ignore1 ignore2) 146 (defun Buffer-menu-revert-function (ignore1 ignore2)
148 (list-buffers)) 147 (list-buffers))