summaryrefslogtreecommitdiff
path: root/lisp/mouse-sel.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2006-10-07 10:58:39 +0000
committerEli Zaretskii <eliz@gnu.org>2006-10-07 10:58:39 +0000
commitd3886822054abef2c356b5e065077caccb0bc874 (patch)
tree4a80a1a83ce56c120d3f3ddd7808371b1f5b974d /lisp/mouse-sel.el
parent912626459124dcc71cdbb4f1c5a5761d3c119876 (diff)
downloademacs-d3886822054abef2c356b5e065077caccb0bc874.tar.gz
(mouse-insert-selection-internal): Use insert-for-yank, so that yank handlers
are run.
Diffstat (limited to 'lisp/mouse-sel.el')
-rw-r--r--lisp/mouse-sel.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mouse-sel.el b/lisp/mouse-sel.el
index a327b589f54..a1209f827f1 100644
--- a/lisp/mouse-sel.el
+++ b/lisp/mouse-sel.el
@@ -737,7 +737,8 @@ If `mouse-yank-at-point' is non-nil, insert at point instead."
(mouse-set-point event))
(when mouse-sel-get-selection-function
(push-mark (point) 'nomsg)
- (insert (or (funcall mouse-sel-get-selection-function selection) ""))))
+ (insert-for-yank
+ (or (funcall mouse-sel-get-selection-function selection) ""))))
;;=== Handle loss of selections ===========================================