Commit 4991d130 authored by Stefan Monnier's avatar Stefan Monnier

* mouse.el (mouse-yank-primary, mouse-yank-secondary): Use insert-for-yank.

Fixes: debbugs:17271
parent cc4f9c83
2014-07-02 Stefan Monnier <monnier@iro.umontreal.ca>
* mouse.el (mouse-yank-primary, mouse-yank-secondary):
Use insert-for-yank (bug#17271).
2014-07-02 Leo Liu <sdl.web@gmail.com>
* emacs-lisp/pp.el (pp-eval-expression, pp-eval-last-sexp):
......
......@@ -1101,7 +1101,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.
......@@ -1383,7 +1383,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 ()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment