2008-01-04 Tassilo Horn <tassilo@member.fsf.org>

	* doc-view.el (doc-view-mode-map): Remap scroll-{up,down} to
	image-scroll-{up,down}.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7a702a13f37fb4b43ad27befcb7be2faa36413c5..9568604a9edd5a161046e38e0d62053226a812bc 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -25,6 +25,8 @@
        image-scroll-down instead of the non-image equivalents.  Don't
        rely on a signalled condition but switch pages when scrolling
        doesn't change the vertical position anymore.
+       (doc-view-mode-map): Remap scroll-{up,down} to
+       image-scroll-{up,down}.
 
 2008-01-04  Rob Riepel  <riepel@networking.Stanford.EDU>
 

diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index c47e98fe36867454d236af34963dec2f34096f72..2f1d9f5378399ae726f3ab0bae131af541a6d2ba 100644 (file)
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -264,6 +264,8 @@ has finished."
     (define-key map (kbd "M-<")       'doc-view-first-page)
     (define-key map (kbd "M->")       'doc-view-last-page)
     (define-key map [remap goto-line] 'doc-view-goto-page)
+    (define-key map [remap scroll-up] 'image-scroll-up)
+    (define-key map [remap scroll-down] 'image-scroll-down)
     ;; Zoom in/out.
     (define-key map "+"               'doc-view-enlarge)
     (define-key map "-"               'doc-view-shrink)