(comint-show-output): Adjust to stickiness changes of the output field.

2 files changed, 4 insertions, 5 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f1ed3e07e35..37f06b10a84 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2008-09-28  Romain Francoise  <romain@orebokech.com>
 
+        * comint.el (comint-show-output): Adjust to stickiness changes of
+        the output field.
+
         * startup.el (command-line): Start the daemon server later.
 
 2008-09-28  Martin Rudalics  <rudalics@gmx.at>
diff --git a/lisp/comint.el b/lisp/comint.el
index c639053c1ca..1070652d777 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -2125,11 +2125,7 @@ Sets mark to the value of point when this command is run."
            (set-window-start (selected-window) (point))
            (comint-skip-prompt))
           (t
-           (let* ((beg (field-beginning pos))
-                  (pt (if (= (point-min) beg)
-                          (point-min)
-                        (1+ beg))))
-             (goto-char pt))
+           (goto-char (field-beginning pos))
            (set-window-start (selected-window) (point))))))