changeset 45854:875b299f29c6

(comint-insert-clicked-input): Insert clicked-on previous input without properties. Patch from John Paul Wallington <jpw@shootybangbang.com>.
author Miles Bader <miles@gnu.org>
date Mon, 17 Jun 2002 08:10:22 +0000
parents a78008e81b3d
children 31950ed3be11
files lisp/comint.el
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Mon Jun 17 06:08:23 2002 +0000
+++ b/lisp/comint.el	Mon Jun 17 08:10:22 2002 +0000
@@ -779,10 +779,9 @@
 	   (process-mark (get-buffer-process (current-buffer))))
        (point))
       ;; Insert the clicked-upon input
-      (insert-buffer-substring
-       (current-buffer)
-       (previous-single-char-property-change (1+ pos) 'field)
-       (next-single-char-property-change pos 'field)))))
+      (insert (buffer-substring-no-properties
+	       (previous-single-char-property-change (1+ pos) 'field)
+	       (next-single-char-property-change pos 'field))))))