procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(comint-insert-input): Fix previous change.

Browse source
This commit is contained in:
Richard M. Stallman 2004-11-02 14:16:30 +00:00
parent 949b26bce2
commit 76e159ab68
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/comint.el
View file

@ -788,7 +788,7 @@ buffer. The hook `comint-exec-hook' is run after each exec."
(defun comint-insert-input (&optional event)
"In a Comint buffer, set the current input to the previous input at point."
(interactive "@")
(interactive "e")
(if event (mouse-set-point event))
(let ((pos (point)))
(if (not (eq (get-char-property pos 'field) 'input))