# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1243348671 0
# Node ID 578359a0fca609230da728a9484eda6fa3721b44
# Parent  299eb8fbcd4932c93876ab32014eb92f4ecc6cbe
* view.el (view-recenter): Allow recenter to compute window height
normally.

diff -r 299eb8fbcd49 -r 578359a0fca6 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue May 26 03:32:02 2009 +0000
+++ b/lisp/ChangeLog	Tue May 26 14:37:51 2009 +0000
@@ -1,3 +1,8 @@
+2009-05-26  Chong Yidong  <cyd@stupidchicken.com>
+
+	* view.el (view-recenter): Allow recenter to compute window height
+	normally.
+
 2009-05-26  Kenichi Handa  <handa@m17n.org>
 
 	* textmodes/table.el (table--unibyte-char-to-multibyte): Function
diff -r 299eb8fbcd49 -r 578359a0fca6 lisp/view.el
--- a/lisp/view.el	Tue May 26 03:32:02 2009 +0000
+++ b/lisp/view.el	Tue May 26 14:37:51 2009 +0000
@@ -757,8 +757,8 @@
 ;;  (setq this-command view-last-command-entry))
 
 (defun view-recenter ()
-  ;; Center point in window.
-  (recenter (/ (view-window-size) 2)))
+  ;; Recenter point in window and redisplay normally.
+  (recenter '(1)))
 
 (defun view-page-size-default (lines)
   ;; Get page size.