changeset 53761:422169b36462

(term-mouse-paste): Call mouse-set-point.
author Richard M. Stallman <rms@gnu.org>
date Fri, 30 Jan 2004 16:53:11 +0000
parents 1430b8f0f2fe
children 283d730ea2ab
files lisp/term.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/term.el	Fri Jan 30 08:02:57 2004 +0000
+++ b/lisp/term.el	Fri Jan 30 16:53:11 2004 +0000
@@ -1172,6 +1172,7 @@
    ;; Give temporary modes such as isearch a chance to turn off.
    (run-hooks 'mouse-leave-buffer-hook)
    (setq this-command 'yank)
+   (mouse-set-point click)
    (term-send-raw-string (current-kill (cond
 					((listp arg) 0)
 					((eq arg '-) -1)