changeset 39115:8249ca4e2b8a

(comint-insert-clicked-input): Goto point-max before deleting previous input. From "Dr Francis J. Wright" <F.J.Wright@qmw.ac.uk>.
author Gerd Moellmann <gerd@gnu.org>
date Tue, 04 Sep 2001 12:44:49 +0000
parents b2138f010a06
children dbec2c0befe8
files lisp/comint.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/comint.el	Tue Sep 04 11:28:50 2001 +0000
+++ b/lisp/comint.el	Tue Sep 04 12:44:49 2001 +0000
@@ -787,6 +787,7 @@
     (if over
 	(let ((input-str (buffer-substring (overlay-start over)
 					   (overlay-end over))))
+	  (goto-char (point-max))
 	  (delete-region
 	   ;; Can't use kill-region as it sets this-command
 	   (or  (marker-position comint-accum-marker)