From 5b23b5e40b28f04208925e2850743ca3cae2ae88 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 2 May 1998 05:05:55 +0000 Subject: [PATCH] (apropos-mode-map): Bind q to quit-window. --- lisp/apropos.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/apropos.el b/lisp/apropos.el index 89ea5e46144..90fa4309f1b 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el @@ -108,8 +108,9 @@ This looks good, but slows down the commands several times." (defvar apropos-mode-map (let ((map (make-sparse-keymap))) (define-key map "\C-m" 'apropos-follow) - (define-key map " " 'scroll-up) - (define-key map "\177" 'scroll-down) + (define-key map " " 'scroll-up) + (define-key map "\177" 'scroll-down) + (define-key map "q" 'quit-window) (define-key map [mouse-2] 'apropos-mouse-follow) (define-key map [down-mouse-2] nil) map) -- 2.39.5