From: Andreas Schwab <schwab@suse.de>
Date: Fri, 28 Oct 2005 09:43:01 +0000 (+0000)
Subject: (View-revert-buffer-scroll-page-forward): Use
X-Git-Tag: emacs-pretest-22.0.90~6250
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a312f21413fa647cb448aeec17bf11e8de76767f;p=emacs.git

(View-revert-buffer-scroll-page-forward): Use
view-page-size-default.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0982f2782d7..224f1e39565 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2005-10-28  Andreas Schwab  <schwab@suse.de>
+
+	* view.el (View-revert-buffer-scroll-page-forward): Use
+	view-page-size-default.
+
 2005-10-28  Juri Linkov  <juri@jurta.org>
 
 	* international/quail.el (quail-get-current-str): Translate last
diff --git a/lisp/view.el b/lisp/view.el
index 80c6207f275..0d6b941a0ca 100644
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -874,7 +874,7 @@ If LINES is more than a window-full, only the last window-full is shown."
   (interactive "P")
   (let ((view-scroll-auto-exit nil)
 	(view-try-extend-at-buffer-end t))
-    (view-scroll-lines lines nil view-page-size nil)))
+    (view-scroll-lines lines nil (view-page-size-default view-page-size) nil)))
 
 (defun View-search-regexp-forward (n regexp)
   "Search forward for first (or prefix Nth) occurrence of REGEXP in View mode.