summaryrefslogtreecommitdiff
path: root/lisp/mouse.el
diff options
context:
space:
mode:
authorGlenn Morris <rgm@gnu.org>2014-07-02 23:00:53 -0700
committerGlenn Morris <rgm@gnu.org>2014-07-02 23:00:53 -0700
commit2d3c9015c70fd05ac1bec42cc59d57c3fb6b82b5 (patch)
tree572bc2de8c74eee49d8c49eb84a618b55fa3abf7 /lisp/mouse.el
parente993f8d5d39431545ac0071655071a740534917b (diff)
parentcbb6a7aeff3b901645ee8e4f2c4abeceafdfc073 (diff)
downloademacs-2d3c9015c70fd05ac1bec42cc59d57c3fb6b82b5.tar.gz
Merge from emacs-24; up to 2014-06-15T04:52:34Z!eli@barzilay.org
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r--lisp/mouse.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 7beea8e26e6..d3bcf02f217 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -1079,7 +1079,7 @@ regardless of where you click."
(unless primary
(error "No selection is available"))
(push-mark (point))
- (insert primary)))
+ (insert-for-yank primary)))
(defun mouse-kill-ring-save (click)
"Copy the region between point and the mouse click in the kill ring.
@@ -1361,7 +1361,7 @@ regardless of where you click."
(or mouse-yank-at-point (mouse-set-point click))
(let ((secondary (x-get-selection 'SECONDARY)))
(if secondary
- (insert secondary)
+ (insert-for-yank secondary)
(error "No secondary selection"))))
(defun mouse-kill-secondary ()