[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/doc-view.el,v
From: |
Tassilo Horn |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/doc-view.el,v |
Date: |
Fri, 04 Jan 2008 08:27:20 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Tassilo Horn <tsdh> 08/01/04 08:27:20
Index: doc-view.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/doc-view.el,v
retrieving revision 1.31
retrieving revision 1.32
diff -u -b -r1.31 -r1.32
--- doc-view.el 4 Jan 2008 03:12:17 -0000 1.31
+++ doc-view.el 4 Jan 2008 08:27:20 -0000 1.32
@@ -377,17 +377,16 @@
(defun doc-view-scroll-up-or-next-page ()
"Scroll page up if possible, else goto next page."
(interactive)
- (condition-case nil
- (scroll-up)
- (error (doc-view-next-page))))
+ (when (= (window-vscroll) (image-scroll-up nil))
+ (doc-view-next-page)
+ (set-window-vscroll nil 0)))
(defun doc-view-scroll-down-or-previous-page ()
"Scroll page down if possible, else goto previous page."
(interactive)
- (condition-case nil
- (scroll-down)
- (error (doc-view-previous-page)
- (goto-char (point-max)))))
+ (when (= (window-vscroll) (image-scroll-down nil))
+ (doc-view-previous-page)
+ (image-scroll-up nil)))
;;;; Utility Functions
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Karl Fogel, 2008/01/02
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Miles Bader, 2008/01/02
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Glenn Morris, 2008/01/03
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v,
Tassilo Horn <=
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/04
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/04
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/09
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/09
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/10
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/10
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Stefan Monnier, 2008/01/18
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Stefan Monnier, 2008/01/19
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/29
- [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v, Tassilo Horn, 2008/01/29