/[emacs]/emacs/lisp/ebuff-menu.el
ViewVC logotype

Diff of /emacs/lisp/ebuff-menu.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.28 by rms, Tue Nov 13 17:29:40 2001 UTC revision 1.29 by lektu, Tue Feb 4 11:12:24 2003 UTC
# Line 54  much like those of buffer-menu-mode. Line 54  much like those of buffer-menu-mode.
54    
55  Calls value of `electric-buffer-menu-mode-hook' on entry if non-nil.  Calls value of `electric-buffer-menu-mode-hook' on entry if non-nil.
56    
57  \\{electric-buffer-menu-mode-map}"  \\{electric-buffer-menu-mode-map}"
58    (interactive "P")    (interactive "P")
59    (let (select buffer)    (let (select buffer)
60      (save-window-excursion      (save-window-excursion
# Line 209  electric-buffer-menu-mode-hook if it is Line 209  electric-buffer-menu-mode-hook if it is
209      (define-key map [escape escape escape] 'Electric-buffer-menu-quit)      (define-key map [escape escape escape] 'Electric-buffer-menu-quit)
210      (define-key map [mouse-2] 'Electric-buffer-menu-mouse-select)      (define-key map [mouse-2] 'Electric-buffer-menu-mouse-select)
211      (setq electric-buffer-menu-mode-map map)))      (setq electric-buffer-menu-mode-map map)))
212    
213  (defun Electric-buffer-menu-exit ()  (defun Electric-buffer-menu-exit ()
214    (interactive)    (interactive)
215    (setq unread-command-events (listify-key-sequence (this-command-keys)))    (setq unread-command-events (listify-key-sequence (this-command-keys)))

Legend:
Removed from v.1.28  
changed lines
  Added in v.1.29

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26