Mercurial > emacs
changeset 10375:8652c7b84a5f
(face-try-color-list): Treat `underline' as valid.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 10 Jan 1995 06:52:53 +0000 |
parents | d6de68b87cbd |
children | b1c4515958b6 |
files | lisp/faces.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/faces.el Tue Jan 10 03:14:24 1995 +0000 +++ b/lisp/faces.el Tue Jan 10 06:52:53 1995 +0000 @@ -1048,7 +1048,7 @@ (invert-face face frame) (let (done) (while (and colors (not done)) - (if (or (eq (car colors) t) + (if (or (memq (car colors) '(t underline)) (face-color-supported-p frame (car colors) (eq function 'set-face-background))) (if (cdr colors)