diff options
| author | Richard M. Stallman | 1996-09-15 02:16:57 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-09-15 02:16:57 +0000 |
| commit | bc5155cdb1360cc94c3a344cfbbe0f38f2748865 (patch) | |
| tree | ca12a0b584108dbb59b4d8c3001d69d53fc2a0e8 | |
| parent | 7e45a1ec944734017b04e78b12c57643fbb804d1 (diff) | |
| download | emacs-bc5155cdb1360cc94c3a344cfbbe0f38f2748865.tar.gz emacs-bc5155cdb1360cc94c3a344cfbbe0f38f2748865.zip | |
(facemenu-color-equal): Change win32 to ms-windows.
| -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) |