# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 966938996 0
# Node ID 9e1d7707876bd68591c584cd5cdfe9e89cbaddda
# Parent  7c81a282d21786d1c90109a9e1c3f3782119597b
(comint-output-filter):
  Compare end of comint-last-output-overlay with the start of the newly
    inserted text, not the end, when deciding whether to extend it.
  Set saved-point's insertion type to advance after insertion.

diff -r 7c81a282d217 -r 9e1d7707876b lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Aug 22 10:06:55 2000 +0000
+++ b/lisp/ChangeLog	Tue Aug 22 10:09:56 2000 +0000
@@ -1,3 +1,13 @@
+2000-08-22  Miles Bader  <miles@lsi.nec.co.jp>
+
+	* comint.el (comint-output-filter): Compare end of
+	comint-last-output-overlay with the start of the newly inserted
+	text, not the end, when deciding whether to extend it.
+	Set saved-point's insertion type to advance after insertion.  
+
+	* shell.el (shell-font-lock-keywords): Remove prompt highlighting,
+	since this is now done independently of font-lock mode.
+
 2000-08-21  Gerd Moellmann  <gerd@gnu.org>
 
 	* server.el (server-kill-new-buffers): New user option.
diff -r 7c81a282d217 -r 9e1d7707876b lisp/comint.el
--- a/lisp/comint.el	Tue Aug 22 10:06:55 2000 +0000
+++ b/lisp/comint.el	Tue Aug 22 10:09:56 2000 +0000
@@ -1499,6 +1499,9 @@
 	      ;; fiddle with the point
 	      (saved-point (point-marker)))
 
+	  ;; The point should float after any insertion we do
+	  (set-marker-insertion-type saved-point t)
+
 	  ;; We temporarly remove any buffer narrowing, in case the
 	  ;; process mark is outside of the restriction
 	  (save-restriction
@@ -1516,7 +1519,7 @@
 	      ;; adjacent to the new input, and if so, just extend it.
 	      (if (and comint-last-output-overlay
 		       (equal (overlay-end comint-last-output-overlay)
-			      (point)))
+			      (marker-position comint-last-output-start)))
 		  ;; Extend comint-last-output-overlay to include the
 		  ;; most recent output
 		  (move-overlay comint-last-output-overlay