procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(face-spec-set): Interpret a nil in specs for

Browse source 
foreground and background colors as `unspecified', for
compatibility with 20.x.
This commit is contained in:
Gerd Moellmann 2000-12-18 15:05:02 +00:00
parent c5dfddb64f
commit c242484757
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/faces.el
View file

@ -1230,6 +1230,10 @@ If SPEC is nil, do nothing."
(case attribute
(:bold (setq attribute :weight value (if value 'bold 'normal)))
(:italic (setq attribute :slant value (if value 'italic 'normal)))
((:foreground :background)
;; Compatibility with 20.x. Some bogus face specs seem to
;; exist containing things like `:foreground nil'.
(if (null value) (setq value 'unspecified)))
(t (unless (assq attribute face-x-resources)
(setq attribute nil))))
(when attribute