# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 842753817 0
# Node ID a4588c1facee7f72fb733a75e18b17fea3b7a7a9
# Parent  01511a730dd819b9e5a06066f30031471245e6ec
(facemenu-color-equal): Change win32 to ms-windows.

diff -r 01511a730dd8 -r a4588c1facee lisp/facemenu.el
--- a/lisp/facemenu.el	Sun Sep 15 02:15:42 1996 +0000
+++ b/lisp/facemenu.el	Sun Sep 15 02:16:57 1996 +0000
@@ -491,7 +491,7 @@
 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)