# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1099404990 0
# Node ID 1369082dc787e2505dabde4dcbaf7d3244925a36
# Parent  052e33ec79b50d1a9f4011e1d85fa9e9b05c8e6e
(comint-insert-input): Fix previous change.

diff -r 052e33ec79b5 -r 1369082dc787 lisp/comint.el
--- a/lisp/comint.el	Tue Nov 02 13:49:38 2004 +0000
+++ b/lisp/comint.el	Tue Nov 02 14:16:30 2004 +0000
@@ -788,7 +788,7 @@
 
 (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))