From: Richard M. Stallman Date: Sat, 18 Feb 1995 23:56:09 +0000 (+0000) Subject: (mouse-buffer-menu): Don't clear selection when we kill it. X-Git-Tag: emacs-19.34~5076 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fb28fd5b76443212e7fd0826ed83a7ff1d645853;p=emacs.git (mouse-buffer-menu): Don't clear selection when we kill it. --- diff --git a/lisp/mouse.el b/lisp/mouse.el index 04cdeafea70..8db2cafbfa6 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -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)))))))