1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-08 20:58:58 +00:00

(comint-insert-clicked-input): Goto point-max before

deleting previous input.  From "Dr Francis J. Wright"
<F.J.Wright@qmw.ac.uk>.
This commit is contained in:
Gerd Moellmann 2001-09-04 12:45:13 +00:00
parent 83536c16cd
commit c8dd66e195
2 changed files with 5 additions and 0 deletions

View File

@ -1,5 +1,9 @@
2001-09-04 Gerd Moellmann <gerd@gnu.org>
* comint.el (comint-insert-clicked-input): Goto point-max before
deleting previous input. From "Dr Francis J. Wright"
<F.J.Wright@qmw.ac.uk>.
* simple.el (backward-word): Doc fix.
2001-09-04 Eli Zaretskii <eliz@is.elta.co.il>

View File

@ -787,6 +787,7 @@ buffer. The hook `comint-exec-hook' is run after each exec."
(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)