diff options
| author | John Paul Wallington | 2005-11-17 23:02:34 +0000 |
|---|---|---|
| committer | John Paul Wallington | 2005-11-17 23:02:34 +0000 |
| commit | f5723ff54e2bc69dfa025f65d042ee2c485500e3 (patch) | |
| tree | dc1813a7367c704cdfd027dec435736d55be05f8 /lisp | |
| parent | 1617bc07f6e199f5e089b348598c3ab1b05e631c (diff) | |
| download | emacs-f5723ff54e2bc69dfa025f65d042ee2c485500e3.tar.gz emacs-f5723ff54e2bc69dfa025f65d042ee2c485500e3.zip | |
(comint-insert-input): Use `posn-set-point' instead of
`mouse-set-point' because the latter is not fbound when configured
without X.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 13 | ||||
| -rw-r--r-- | lisp/comint.el | 2 |
2 files changed, 14 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 799b426e11b..ebcb76d472f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2005-11-17 John Paul Wallington <jpw@pobox.com> | ||
| 2 | |||
| 3 | * ibuf-ext.el (ibuffer-interactive-filter-by-mode): | ||
| 4 | Use `posn-set-point' instead of `mouse-set-point' because the | ||
| 5 | latter is not fbound when configured without X. | ||
| 6 | |||
| 7 | * comint.el (comint-insert-input): Likewise. | ||
| 8 | |||
| 1 | 2005-11-17 Chong Yidong <cyd@stupidchicken.com> | 9 | 2005-11-17 Chong Yidong <cyd@stupidchicken.com> |
| 2 | 10 | ||
| 3 | * simple.el (hard-newline): New variable. | 11 | * simple.el (hard-newline): New variable. |
| @@ -563,6 +571,11 @@ | |||
| 563 | 571 | ||
| 564 | * textmodes/org.el (org-export-as-html): Remove bogus (debug) form. | 572 | * textmodes/org.el (org-export-as-html): Remove bogus (debug) form. |
| 565 | 573 | ||
| 574 | 2005-11-07 John Paul Wallington <jpw@gnu.org> | ||
| 575 | |||
| 576 | * ibuffer.el (ibuffer): Search iconified frames too when | ||
| 577 | getting Ibuffer buffer's window. | ||
| 578 | |||
| 566 | 2005-11-06 Richard M. Stallman <rms@gnu.org> | 579 | 2005-11-06 Richard M. Stallman <rms@gnu.org> |
| 567 | 580 | ||
| 568 | * progmodes/compile.el (compilation-internal-error-properties): | 581 | * progmodes/compile.el (compilation-internal-error-properties): |
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." | |||
| 799 | ;; for events without parameters. | 799 | ;; for events without parameters. |
| 800 | (interactive (list last-input-event)) | 800 | (interactive (list last-input-event)) |
| 801 | (let ((pos (point))) | 801 | (let ((pos (point))) |
| 802 | (if event (mouse-set-point event)) | 802 | (if event (posn-set-point (event-end event))) |
| 803 | (if (not (eq (get-char-property (point) 'field) 'input)) | 803 | (if (not (eq (get-char-property (point) 'field) 'input)) |
| 804 | ;; No input at POS, fall back to the global definition. | 804 | ;; No input at POS, fall back to the global definition. |
| 805 | (let* ((keys (this-command-keys)) | 805 | (let* ((keys (this-command-keys)) |