mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-10 09:43:26 -08:00
Code Issues Projects Releases Wiki Activity

Use the correct background color when filling nested <divs>

Browse source 
* lisp/net/shr.el (shr-face-background): Return the first
background, because that's the one that's visible (bug#22680).

Backport:

(cherry picked from commit cad0bc7055)
This commit is contained in:
Lars Ingebrigtsen 2016-02-29 22:21:11 +11:00
parent 9781dc4da3
commit dc42d0ca0b
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/net/shr.el
View file

@ -1791,7 +1791,8 @@ The preference is a float determined from `shr-prefer-media-type'."
(let ((background nil))
(dolist (elem face)
(when (and (consp elem)
(eq (car elem) :background))
(eq (car elem) :background)
(not background))
(setq background (cadr elem))))
(and background
(list :background background))))))