(comint-insert-input): Use `posn-set-point' instead of

`mouse-set-point' because the latter is not fbound when configured
without X.

1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/comint.el b/lisp/comint.el
index 3d9da2b8ea2..6676e836735 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -799,7 +799,7 @@ buffer.  The hook `comint-exec-hook' is run after each exec."
   ;; for events without parameters.
   (interactive (list last-input-event))
   (let ((pos (point)))
-    (if event (mouse-set-point event))
+    (if event (posn-set-point (event-end event)))
     (if (not (eq (get-char-property (point) 'field) 'input))
         ;; No input at POS, fall back to the global definition.
         (let* ((keys (this-command-keys))