# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 835949325 0
# Node ID 09b145e9bf4dfc8888e4e8afd1e40dba8c24dc99
# Parent  c4808cb5eccb9a81632c1e4c017f19d65e7721e1
(comint-send-input): Use insert-before-markers for all the insertions.

diff -r c4808cb5eccb -r 09b145e9bf4d lisp/comint.el
--- a/lisp/comint.el	Fri Jun 28 08:06:37 1996 +0000
+++ b/lisp/comint.el	Fri Jun 28 08:08:45 1996 +0000
@@ -1166,11 +1166,11 @@
 			  (comint-replace-by-expanded-history t)
 			  (let ((copy (buffer-substring pmark (point))))
 			    (delete-region pmark (point))
-			    (insert input)
+			    (insert-before-markers input)
 			    copy))))
           (if comint-process-echoes
               (delete-region pmark (point))
-	    (insert ?\n))
+	    (insert-before-markers ?\n))
 	  (if (and (funcall comint-input-filter history)
 		   (or (null comint-input-ignoredups)
 		       (not (ring-p comint-input-ring))