From bc5155cdb1360cc94c3a344cfbbe0f38f2748865 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 15 Sep 1996 02:16:57 +0000 Subject: (facemenu-color-equal): Change win32 to ms-windows. --- lisp/facemenu.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/facemenu.el b/lisp/facemenu.el index 4e0d293ca3..bf6cad47f2 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 color names mean. It returns nil if the colors differ or if it can't determine the correct answer." (cond ((equal a b) t) - ((and (or (eq window-system 'x) (eq window-system 'win32)) + ((and (memq window-system '(x ms-windows)) (equal (x-color-values a) (x-color-values b)))) ((eq window-system 'pc) (and (x-color-defined-p a) (x-color-defined-p b) -- cgit v1.2.3