(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 f1ed3e07e3..37f06b10a8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2008-09-28  Romain Francoise  <[email protected]>
 
+	* 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  <[email protected]>
diff --git a/lisp/comint.el b/lisp/comint.el
index c639053c1c..1070652d77 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))))))