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

[Po Lu]

branch: master
commit cfbb6359cebb6c0465bf132ab5a88c095373c4d0
Author: Po Lu <luangruo@yahoo.com>
Commit: Po Lu <luangruo@yahoo.com>

    ; * lisp/select.el (gui--selection-value-internal): Fix comment.
---
 lisp/select.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/lisp/select.el b/lisp/select.el
index d9f537cfce..ca9061c0b0 100644
--- 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))