diff lisp/comint.el @ 66971:537e6758bfe5

(comint-insert-input): Use `posn-set-point' instead of `mouse-set-point' because the latter is not fbound when configured without X.
author John Paul Wallington <jpw@pobox.com>
date Thu, 17 Nov 2005 22:58:11 +0000
parents 232f770dbf0f
children 3bd95f4f2941 7beb78bc1f8e
line wrap: on
line diff
--- a/lisp/comint.el	Thu Nov 17 22:56:28 2005 +0000
+++ b/lisp/comint.el	Thu Nov 17 22:58:11 2005 +0000
@@ -799,7 +799,7 @@
   ;; 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))