summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2009-05-26 14:37:51 +0000
committerChong Yidong <cyd@stupidchicken.com>2009-05-26 14:37:51 +0000
commitf2872f04a46404e026afce21904248cbb664bc8c (patch)
tree0ae261765178ee64aabde06b22dd2cccad504787
parent66bb84855f71d0fd97736929b39dfce282ec1fff (diff)
downloademacs-f2872f04a46404e026afce21904248cbb664bc8c.tar.gz
* view.el (view-recenter): Allow recenter to compute window height
normally.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/view.el4
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 56ed296fb69..4cb9e41356f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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 --git a/lisp/view.el b/lisp/view.el
index 2bcb208095a..d290c1c3f5d 100644
--- a/lisp/view.el
+++ b/lisp/view.el
@@ -757,8 +757,8 @@ previous state and go to previous buffer or window."
;; (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.