(electric-buffer-menu-mode-map):

Bind ESC ESC ESC to Electric-buffer-menu-quit.

diff --git a/lisp/ebuff-menu.el b/lisp/ebuff-menu.el
index bdbd77e5c40ea5b4c583ce6440093628849de468..4bc0749a025666a921741c998418421389e57295 100644 (file)
--- a/lisp/ebuff-menu.el
+++ b/lisp/ebuff-menu.el
@@ -195,6 +195,8 @@ electric-buffer-menu-mode-hook if it is non-nil."
     (define-key map "\e\C-v" 'scroll-other-window)
     (define-key map "\e>" 'end-of-buffer)
     (define-key map "\e<" 'beginning-of-buffer)
+    (define-key map "\e\e\e" 'Electric-buffer-menu-quit)
+    (define-key map [escape escape escape] 'Electric-buffer-menu-quit)
     (define-key map [mouse-2] 'Electric-buffer-menu-mouse-select)
     (setq electric-buffer-menu-mode-map map)))