diff options
| -rw-r--r-- | lisp/facemenu.el | 2 |
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 | |||
| 491 | color names mean. It returns nil if the colors differ or if it can't | 491 | color names mean. It returns nil if the colors differ or if it can't |
| 492 | determine the correct answer." | 492 | determine 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) |