X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/795b1482a9e314cda32d62ac2988f573d359366e..36a305a723c63fd345be65c536c52fe9765c14be:/lisp/mouse.el

diff --git a/lisp/mouse.el b/lisp/mouse.el
index 74bb97b308..fa5c69281d 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -1151,7 +1151,7 @@ regardless of where you click."
   (or mouse-yank-at-point (mouse-set-point click))
   (let ((primary
 	 (cond
-	  ((eq system-type 'windows-nt)
+	  ((eq (framep (selected-frame)) 'w32)
 	   ;; MS-Windows emulates PRIMARY in x-get-selection, but not
 	   ;; in x-get-selection-value (the latter only accesses the
 	   ;; clipboard).  So try PRIMARY first, in case they selected