changeset 73272:a5ea274e14ac

(mouse-insert-selection-internal): Use insert-for-yank, so that yank handlers are run.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 07 Oct 2006 10:57:52 +0000
parents f2f6f5193df9
children 175d3bb31c63
files lisp/mouse-sel.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mouse-sel.el	Sat Oct 07 10:48:25 2006 +0000
+++ b/lisp/mouse-sel.el	Sat Oct 07 10:57:52 2006 +0000
@@ -737,7 +737,8 @@
     (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 ===========================================