From: ueno Date: Mon, 30 Aug 2004 01:54:21 +0000 (+0000) Subject: * riece-misc.el (riece-insert): Use (recenter -1) to set window X-Git-Tag: riece-1_0_3~12 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=96d107171d301cfaaa1c951343a3b0a8f0af140c;p=elisp%2Friece.git * riece-misc.el (riece-insert): Use (recenter -1) to set window point instead of doing so manually. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 80f6911..29c1be8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-08-30 Daiki Ueno + + * riece-misc.el (riece-insert): Use (recenter -1) to set window + point instead of doing so manually. + 2004-08-28 Daiki Ueno * riece-xemacs.el (riece-put-text-property-nonsticky): New function. diff --git a/lisp/riece-misc.el b/lisp/riece-misc.el index 52c44a5..543549f 100644 --- a/lisp/riece-misc.el +++ b/lisp/riece-misc.el @@ -73,8 +73,7 @@ (insert (format-time-string "%H:%M") " " string) (if (and (not (riece-frozen (current-buffer))) (get-buffer-window (current-buffer))) - (set-window-point (get-buffer-window (current-buffer)) - (point))) + (recenter -1 (get-buffer-window (current-buffer)))) (run-hook-with-args 'riece-after-insert-functions start (point)))) (setq buffers (cdr buffers))))