[Emacs-diffs] Changes to emacs/lisp/doc-view.el,v

[Tassilo Horn]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Tassilo Horn <tsdh>     08/09/12 06:29:29

Index: doc-view.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/doc-view.el,v
retrieving revision 1.73
retrieving revision 1.74
diff -u -b -r1.73 -r1.74
--- doc-view.el 26 Jun 2008 07:18:15 -0000      1.73
+++ doc-view.el 12 Sep 2008 06:29:28 -0000      1.74
@@ -422,7 +422,8 @@
     (let ((cur-page (doc-view-current-page)))
       (doc-view-next-page)
       (when (/= cur-page (doc-view-current-page))
-       (image-scroll-down nil)))))
+       (image-bob)
+       (image-bol 1)))))
 
 (defun doc-view-scroll-down-or-previous-page ()
   "Scroll page down if possible, else goto previous page."
@@ -431,7 +432,8 @@
     (let ((cur-page (doc-view-current-page)))
       (doc-view-previous-page)
       (when (/= cur-page (doc-view-current-page))
-       (image-scroll-up nil)))))
+       (image-eob)
+       (image-bol 1)))))
 
 ;;;; Utility Functions