mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-11-27 07:37:33 +00:00
(xw-defined-colors): Call color-supported-p,
the new name of face-color-supported-p.
This commit is contained in:
parent
da47150ddc
commit
79b24da30b
@ -528,7 +528,7 @@ This returns ARGS with the arguments that have been processed removed."
|
||||
(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))
|
||||
|
||||
|
@ -437,7 +437,7 @@ This function returns ARGS minus the arguments that have been processed."
|
||||
(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))
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user