* riece-layout.el (riece-set-window-points): Use (recenter -1) to

set window point instead of doing so manually.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 29c1be8..103937b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2004-08-30  Daiki Ueno  <ueno@unixuser.org>
 
 2004-08-30  Daiki Ueno  <ueno@unixuser.org>
 

+       * riece-layout.el (riece-set-window-points): Use (recenter -1) to
+       set window point instead of doing so manually.

        * riece-misc.el (riece-insert): Use (recenter -1) to set window
        point instead of doing so manually.
 
        * riece-misc.el (riece-insert): Use (recenter -1) to set window
        point instead of doing so manually.
 

diff --git a/lisp/riece-layout.el b/lisp/riece-layout.el
index ca463dc..5970983 100644 (file)
--- a/lisp/riece-layout.el
+++ b/lisp/riece-layout.el
@@ -91,18 +91,15 @@ happen unconditionally."
            (if riece-channel-buffer-window-point
                (set-window-point (get-buffer-window riece-channel-buffer)
                                  riece-channel-buffer-window-point))
            (if riece-channel-buffer-window-point
                (set-window-point (get-buffer-window riece-channel-buffer)
                                  riece-channel-buffer-window-point))

-         (set-window-point (get-buffer-window riece-channel-buffer)
-                           (point-max)))))
+         (recenter -1 (get-buffer-window riece-channel-buffer)))))

   (if (get-buffer-window riece-others-buffer)
       (with-current-buffer riece-others-buffer
        (unless (riece-frozen riece-others-buffer)
   (if (get-buffer-window riece-others-buffer)
       (with-current-buffer riece-others-buffer
        (unless (riece-frozen riece-others-buffer)

-         (set-window-point (get-buffer-window riece-others-buffer)
-                           (point-max)))))
+         (recenter -1 (get-buffer-window riece-others-buffer)))))

   (if (get-buffer-window riece-dialogue-buffer)
       (with-current-buffer riece-dialogue-buffer
        (unless (riece-frozen riece-dialogue-buffer)
   (if (get-buffer-window riece-dialogue-buffer)
       (with-current-buffer riece-dialogue-buffer
        (unless (riece-frozen riece-dialogue-buffer)

-         (set-window-point (get-buffer-window riece-dialogue-buffer)
-                           (point-max))))))
+         (recenter -1 (get-buffer-window riece-dialogue-buffer))))))

 
 (defun riece-reconfigure-windows-predicate ()
   "Return t, if window reconfiguration is needed.
 
 (defun riece-reconfigure-windows-predicate ()
   "Return t, if window reconfiguration is needed.