; * lisp/select.el (gui--selection-value-internal): Fix comment.

diff --git a/lisp/select.el b/lisp/select.el
index d9f537cfce6019bc97546ce082fa86c56b18b197..ca9061c0b039f4941be31852305f70f80e74b6ad 100644 (file)
--- a/lisp/select.el
+++ b/lisp/select.el
@@ -170,11 +170,12 @@ decided by `x-select-request-type'.  The return value is already
 decoded.  If `gui-get-selection' signals an error, return nil."
   ;; The doc string of `interprogram-paste-function' says to return
   ;; nil if no other program has provided text to paste.
-  (unless (and (memq window-system '(x haiku))
-               ;; gui-backend-selection-p might be unreliable on other
-               ;; window systems.
-               (eq type 'CLIPBOARD)
-               (gui-backend-selection-owner-p type))
+  (unless (and
+           ;; `gui-backend-selection-owner-p' might be unreliable on
+           ;; some other window systems.
+           (memq window-system '(x haiku))
+           (eq type 'CLIPBOARD)
+           (gui-backend-selection-owner-p type))
     (let ((request-type (if (memq window-system '(x pgtk))
                             (or x-select-request-type
                                 '(UTF8_STRING COMPOUND_TEXT STRING text/plain\;charset=utf-8))