diff options
| author | Kim F. Storm | 2005-02-18 22:55:53 +0000 |
|---|---|---|
| committer | Kim F. Storm | 2005-02-18 22:55:53 +0000 |
| commit | 91c212f159577c0be32ec8fcc1f8e6a23777ee6d (patch) | |
| tree | 7dab9ed53d1e93608e2e64b4238449be90f10995 | |
| parent | c2ee48fb0842d75f41cd5f4f83af7686e412e878 (diff) | |
| download | emacs-91c212f159577c0be32ec8fcc1f8e6a23777ee6d.tar.gz emacs-91c212f159577c0be32ec8fcc1f8e6a23777ee6d.zip | |
(Finternal_set_lisp_face_attribute): Allow :color property
to be nil in a :box attribute value list; customize prints that
as lisp value when no box color is specified.
| -rw-r--r-- | src/xfaces.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/xfaces.c b/src/xfaces.c index c562ce3b592..c02295c7a27 100644 --- a/src/xfaces.c +++ b/src/xfaces.c | |||
| @@ -4148,7 +4148,7 @@ FRAME 0 means change the face on all frames, and change the default | |||
| 4148 | } | 4148 | } |
| 4149 | else if (EQ (k, QCcolor)) | 4149 | else if (EQ (k, QCcolor)) |
| 4150 | { | 4150 | { |
| 4151 | if (!STRINGP (v) || SCHARS (v) == 0) | 4151 | if (!NILP (v) && (!STRINGP (v) || SCHARS (v) == 0)) |
| 4152 | break; | 4152 | break; |
| 4153 | } | 4153 | } |
| 4154 | else if (EQ (k, QCstyle)) | 4154 | else if (EQ (k, QCstyle)) |