* term.el (term-mouse-paste): Reorder to silence --without-x compilation.

2 files changed, 9 insertions, 9 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7ddc5425435..fd6d8f0a547 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -6,6 +6,7 @@
         Remove --without-x warning/error.
 
         * mouse.el (mouse-yank-primary):
+        * term.el (term-mouse-paste):
         Reorder to silence --without-x compilation.
 
         * mpc.el (doc-view-mode): Silence --without-x compilation.
diff --git a/lisp/term.el b/lisp/term.el
index be080297b2e..d9ba848e8be 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -1252,15 +1252,14 @@ without any interpretation."
     (setq this-command 'yank)
     (mouse-set-point click)
     (term-send-raw-string
-     (or (cond  ; From `mouse-yank-primary':
-          ((eq system-type 'windows-nt)
-           (or (x-get-selection 'PRIMARY)
-               (x-get-selection-value)))
-          ((fboundp 'x-get-selection-value)
-           (or (x-get-selection-value)
-               (x-get-selection 'PRIMARY)))
-          (t
-           (x-get-selection 'PRIMARY)))
+     ;; From `mouse-yank-primary':
+     (or (if (fboundp 'x-get-selection-value)
+             (if (eq system-type 'windows-nt)
+                 (or (x-get-selection 'PRIMARY)
+                     (x-get-selection-value))
+               (or (x-get-selection-value)
+                   (x-get-selection 'PRIMARY)))
+           (x-get-selection 'PRIMARY))
          (error "No selection is available")))))
 
 (defun term-paste ()