Commit 27cd44bc authored by Dave Love's avatar Dave Love
Browse files

Use display-color-p.

parent 04c26901
......@@ -614,7 +614,7 @@ no color is set and a warning is issued."
(let ((name (symbol-name symbol))
foreground)
(cond ((internal-find-face symbol))
((and window-system
((and (display-color-p)
(or (setq foreground (string-match "^fg:" name))
(string-match "^bg:" name)))
(let ((face (make-face symbol))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment