diff options
| author | Andreas Schwab | 2004-02-06 21:41:45 +0000 |
|---|---|---|
| committer | Andreas Schwab | 2004-02-06 21:41:45 +0000 |
| commit | daa3ea8d18fd03d6bd1cb2f37fb991e70934e0ab (patch) | |
| tree | 49a031e9fced4170f46f712716ce19e67f5e782a | |
| parent | eb3c144cdb9a063cb24de11f68d2b3b680d5bd3c (diff) | |
| download | emacs-daa3ea8d18fd03d6bd1cb2f37fb991e70934e0ab.tar.gz emacs-daa3ea8d18fd03d6bd1cb2f37fb991e70934e0ab.zip | |
(view-mode-enable): Add view-mode-map to
minor-mode-overriding-map-alist.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/view.el | 3 |
2 files changed, 8 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0bb4307abf6..4927167ae97 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2004-02-06 Andreas Schwab <schwab@suse.de> | ||
| 2 | |||
| 3 | * view.el (view-mode-enable): Add view-mode-map to | ||
| 4 | minor-mode-overriding-map-alist. | ||
| 5 | |||
| 1 | 2004-02-05 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> | 6 | 2004-02-05 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> |
| 2 | 7 | ||
| 3 | * x-dnd.el (x-dnd-get-local-file-name): Fix byte compiler warning | 8 | * x-dnd.el (x-dnd-get-local-file-name): Fix byte compiler warning |
diff --git a/lisp/view.el b/lisp/view.el index 1ee6014c73a..6d7ad4aa468 100644 --- a/lisp/view.el +++ b/lisp/view.el | |||
| @@ -463,6 +463,9 @@ Entry to view-mode runs the normal hook `view-mode-hook'." | |||
| 463 | (if (buffer-file-name) | 463 | (if (buffer-file-name) |
| 464 | (file-name-nondirectory (buffer-file-name)) | 464 | (file-name-nondirectory (buffer-file-name)) |
| 465 | (buffer-name)))) | 465 | (buffer-name)))) |
| 466 | ;; Override major mode's scrolling commands. | ||
| 467 | (add-to-list 'minor-mode-overriding-map-alist | ||
| 468 | (cons 'view-mode view-mode-map)) | ||
| 466 | (force-mode-line-update) | 469 | (force-mode-line-update) |
| 467 | (run-hooks 'view-mode-hook)) | 470 | (run-hooks 'view-mode-hook)) |
| 468 | 471 | ||