# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 946900692 0
# Node ID a5791b2ee66816dba97404477f52bb218d8d5fb6
# Parent  9a0d8503806ed8e7f29163056880587a0142daf3
(xw-defined-colors): Call color-supported-p,
the new name of face-color-supported-p.

diff -r 9a0d8503806e -r a5791b2ee668 lisp/term/w32-win.el
--- a/lisp/term/w32-win.el	Mon Jan 03 11:51:33 2000 +0000
+++ b/lisp/term/w32-win.el	Mon Jan 03 11:58:12 2000 +0000
@@ -528,7 +528,7 @@
     (while all-colors
       (setq this-color (car all-colors)
 	    all-colors (cdr all-colors))
-      (and (face-color-supported-p frame this-color t)
+      (and (color-supported-p this-color frame t)
 	   (setq defined-colors (cons this-color defined-colors))))
     defined-colors))
 
diff -r 9a0d8503806e -r a5791b2ee668 lisp/term/x-win.el
--- a/lisp/term/x-win.el	Mon Jan 03 11:51:33 2000 +0000
+++ b/lisp/term/x-win.el	Mon Jan 03 11:58:12 2000 +0000
@@ -437,7 +437,7 @@
     (while all-colors
       (setq this-color (car all-colors)
 	    all-colors (cdr all-colors))
-      (and (face-color-supported-p frame this-color t)
+      (and (color-supported-p this-color frame t)
 	   (setq defined-colors (cons this-color defined-colors))))
     defined-colors))