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

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 04cdeafea7094d9e265aa28c9453fbe539b3140f..8db2cafbfa6a5cf062f8ef1f5ed88d619450b33f 100644 (file)
--- 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)))))))