# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1075481591 0
# Node ID 422169b36462002caa4d214ee08057e086d30ec2
# Parent  1430b8f0f2fe084f31128b4b492abf61d00366dc
(term-mouse-paste): Call mouse-set-point.

diff -r 1430b8f0f2fe -r 422169b36462 lisp/term.el
--- 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)