diff options
author | Jason Rumney <jasonr@gnu.org> | 2009-04-18 13:52:29 +0000 |
---|---|---|
committer | Jason Rumney <jasonr@gnu.org> | 2009-04-18 13:52:29 +0000 |
commit | c3f9cd46616560e095cf9713b844e85268e0fca6 (patch) | |
tree | 8d4f4faf64b50e93e71427294fd9fde6ef02097a /lisp/facemenu.el | |
parent | 973e784949e9089d3237277315a8c93ccb886422 (diff) | |
download | emacs-c3f9cd46616560e095cf9713b844e85268e0fca6.tar.gz |
(list-colors-duplicates): w32-default-color-map is a function.
Diffstat (limited to 'lisp/facemenu.el')
-rw-r--r-- | lisp/facemenu.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/facemenu.el b/lisp/facemenu.el index 51a71ad7d8e..a9f4f729edd 100644 --- a/lisp/facemenu.el +++ b/lisp/facemenu.el @@ -537,8 +537,8 @@ a list of colors that the current display can handle." (l list)) (while (cdr l) (if (and (facemenu-color-equal (car (car l)) (car (car (cdr l)))) - (not (if (boundp 'w32-default-color-map) - (not (assoc (car (car l)) w32-default-color-map))))) + (not (if (fboundp 'w32-default-color-map) + (not (assoc (car (car l)) (w32-default-color-map)))))) (progn (setcdr (car l) (cons (car (car (cdr l))) (cdr (car l)))) (setcdr l (cdr (cdr l)))) |