diff lisp/comint.el @ 95899:d5d7186027e2

* progmodes/compile.el (compilation-start): Don't disable undo in comint buffer. Don't override the comint-filter with our own. (compilation-filter): Change point's insertion-type. * comint.el (comint-output-filter): Use copy-marker.

--- a/lisp/comint.el	Fri Jun 13 15:15:32 2008 +0000
+++ b/lisp/comint.el	Fri Jun 13 16:22:16 2008 +0000
@@ -1740,12 +1740,8 @@
 
 	;; Insert STRING
 	(let ((inhibit-read-only t)
-	      ;; Avoid the overhead of save-excursion, since we just
-	      ;; fiddle with the point
-	      (saved-point (point-marker)))
-
-	  ;; The point should float after any insertion we do
-	  (set-marker-insertion-type saved-point t)
+              ;; The point should float after any insertion we do.
+	      (saved-point (copy-marker (point) t)))
 
 	  ;; We temporarly remove any buffer narrowing, in case the
 	  ;; process mark is outside of the restriction