Skip to content

GitLab

Commit fb28fd5b authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(mouse-buffer-menu): Don't clear selection when we kill it.

parent bfda6e4f
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
lisp/mouse.el
View file @ fb28fd5b
......@@ -1005,8 +1005,8 @@ again. If you do this twice in the same position, it kills the selection."
(overlay-put mouse-secondary-overlay 'face 'secondary-selection))))
(setq mouse-save-then-kill-posn
(list (car kill-ring) (point) click-posn))))
(x-set-selection 'SECONDARY
(if (overlay-buffer mouse-secondary-overlay)
(if (overlay-buffer mouse-secondary-overlay)
(x-set-selection 'SECONDARY
(buffer-substring
(overlay-start mouse-secondary-overlay)
(overlay-end mouse-secondary-overlay)))))))
......
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