Mercurial > emacs
changeset 59776:eb109ea1450a
(comint-insert-input): Undo previous changes;
use last-input-event in interactive spec.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 29 Jan 2005 16:58:34 +0000 |
| parents | d39551ad7f40 |
| children | 06bae5eee9dc |
| files | lisp/comint.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/comint.el Sat Jan 29 16:56:30 2005 +0000 +++ b/lisp/comint.el Sat Jan 29 16:58:34 2005 +0000 @@ -788,7 +788,9 @@ (defun comint-insert-input (&optional event) "In a Comint buffer, set the current input to the previous input at point." - (interactive "e") + ;; This doesn't use "e" because it is supposed to work + ;; for events without parameters. + (interactive (list last-input-event)) (if event (mouse-set-point event)) (let ((pos (point))) (if (not (eq (get-char-property pos 'field) 'input))