(view-mode-enable): Add view-mode-map to

minor-mode-overriding-map-alist.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0bb4307abf62afaed56393d340886aaa44c9f6ad..4927167ae97c6773d8ebddac60a3a059b25a991b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2004-02-06  Andreas Schwab  <schwab@suse.de>
+
+       * view.el (view-mode-enable): Add view-mode-map to
+       minor-mode-overriding-map-alist.
+
 2004-02-05  Jan Dj\e,Ad\e(Brv  <jan.h.d@swipnet.se>
 
        * x-dnd.el (x-dnd-get-local-file-name): Fix byte compiler warning

diff --git a/lisp/view.el b/lisp/view.el
index 1ee6014c73a12e7e7afa508f28b850b9097b145d..6d7ad4aa468bc763643c32b8bd5d28eff1a99f26 100644 (file)
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -463,6 +463,9 @@ Entry to view-mode runs the normal hook `view-mode-hook'."
                (if (buffer-file-name)
                    (file-name-nondirectory (buffer-file-name))
                  (buffer-name))))
+  ;; Override major mode's scrolling commands.
+  (add-to-list 'minor-mode-overriding-map-alist
+              (cons 'view-mode view-mode-map))
   (force-mode-line-update)
   (run-hooks 'view-mode-hook))