diff options
Diffstat (limited to 'lisp/comint.el')
| -rw-r--r-- | lisp/comint.el | 2 |
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)) |