aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/facemenu.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/facemenu.el b/lisp/facemenu.el
index 4e0d293ca30..bf6cad47f24 100644
--- a/lisp/facemenu.el
+++ b/lisp/facemenu.el
@@ -491,7 +491,7 @@ This function queries the window-system server to find out what the
491color names mean. It returns nil if the colors differ or if it can't 491color names mean. It returns nil if the colors differ or if it can't
492determine the correct answer." 492determine the correct answer."
493 (cond ((equal a b) t) 493 (cond ((equal a b) t)
494 ((and (or (eq window-system 'x) (eq window-system 'win32)) 494 ((and (memq window-system '(x ms-windows))
495 (equal (x-color-values a) (x-color-values b)))) 495 (equal (x-color-values a) (x-color-values b))))
496 ((eq window-system 'pc) 496 ((eq window-system 'pc)
497 (and (x-color-defined-p a) (x-color-defined-p b) 497 (and (x-color-defined-p a) (x-color-defined-p b)