From: Romain Francoise <romain@orebokech.com>
Date: Sun, 28 Sep 2008 16:56:48 +0000 (+0000)
Subject: (comint-show-output): Adjust to stickiness changes of the output field.
X-Git-Tag: emacs-pretest-23.0.90~2734
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ddee16047157a15fb4de0dba8ee2bcdb59d2fe00;p=emacs.git

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

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))))))