Commit aa2d4bd3 authored by Sam Steingold's avatar Sam Steingold
Browse files

* lisp/mouse.el (mouse-yank-primary, mouse-yank-secondary):

Do not call `x-get-selection' the second time, reuse the value.
parent 977105dc
2010-07-26 Sam Steingold <sds@gnu.org>
* mouse.el (mouse-yank-primary, mouse-yank-secondary):
Do not call `x-get-selection' the second time, reuse the value.
2010-07-26 Daiki Ueno <ueno@unixuser.org>
 
* epa-mail.el (epa-mail-mode-map): Add alternative key bindings
......
......@@ -1282,7 +1282,7 @@ regardless of where you click."
(or mouse-yank-at-point (mouse-set-point click))
(let ((primary (x-get-selection 'PRIMARY)))
(if primary
(insert (x-get-selection 'PRIMARY))
(insert primary)
(error "No primary selection"))))
(defun mouse-kill-ring-save (click)
......@@ -1577,7 +1577,7 @@ regardless of where you click."
(or mouse-yank-at-point (mouse-set-point click))
(let ((secondary (x-get-selection 'SECONDARY)))
(if secondary
(insert (x-get-selection 'SECONDARY))
(insert 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