diff options
| author | Nick Roberts <nickrob@snap.net.nz> | 2008-01-10 11:28:33 +0000 |
|---|---|---|
| committer | Nick Roberts <nickrob@snap.net.nz> | 2008-01-10 11:28:33 +0000 |
| commit | d1497e8d4d6842e8f47333360f155164196f0d66 (patch) | |
| tree | 0652033122acbecd5c011afd177bd7385fff930d /lisp/comint.el | |
| parent | dae8c7842c9703fc13ab118317fd7c2e76a3c767 (diff) | |
| download | emacs-d1497e8d4d6842e8f47333360f155164196f0d66.tar.gz emacs-d1497e8d4d6842e8f47333360f155164196f0d66.tar.bz2 emacs-d1497e8d4d6842e8f47333360f155164196f0d66.zip | |
(comint-insert-input): Set point first.
Diffstat (limited to 'lisp/comint.el')
| -rw-r--r-- | lisp/comint.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/comint.el b/lisp/comint.el index b666ff42f37..0a22cdba5c9 100644 --- a/lisp/comint.el +++ b/lisp/comint.el @@ -820,6 +820,7 @@ buffer. The hook `comint-exec-hook' is run after each exec." If there is no previous input at point, run the command specified by the global keymap (usually `mouse-yank-at-point')." (interactive "e") + (mouse-set-point event) (let ((pos (posn-point (event-end event))) field input) (with-selected-window (posn-window (event-end event)) |