diff options
| -rw-r--r-- | lisp/apropos.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/apropos.el b/lisp/apropos.el index 6dd736e880e..8d1bbfb186e 100644 --- a/lisp/apropos.el +++ b/lisp/apropos.el | |||
| @@ -90,6 +90,8 @@ This looks good, but slows down the commands several times.") | |||
| 90 | (defvar apropos-mode-map | 90 | (defvar apropos-mode-map |
| 91 | (let ((map (make-sparse-keymap))) | 91 | (let ((map (make-sparse-keymap))) |
| 92 | (define-key map "\C-m" 'apropos-follow) | 92 | (define-key map "\C-m" 'apropos-follow) |
| 93 | (define-key map " " 'scroll-up) | ||
| 94 | (define-key map "\177" 'scroll-down) | ||
| 93 | (define-key map [mouse-2] 'apropos-mouse-follow) | 95 | (define-key map [mouse-2] 'apropos-mouse-follow) |
| 94 | (define-key map [down-mouse-2] nil) | 96 | (define-key map [down-mouse-2] nil) |
| 95 | map) | 97 | map) |
| @@ -115,7 +117,6 @@ This looks good, but slows down the commands several times.") | |||
| 115 | (interactive) | 117 | (interactive) |
| 116 | (kill-all-local-variables) | 118 | (kill-all-local-variables) |
| 117 | (use-local-map apropos-mode-map) | 119 | (use-local-map apropos-mode-map) |
| 118 | (view-mode) | ||
| 119 | (setq major-mode 'apropos-mode | 120 | (setq major-mode 'apropos-mode |
| 120 | mode-name "Apropos")) | 121 | mode-name "Apropos")) |
| 121 | 122 | ||