Use the correct background color when filling nested <divs>
* lisp/net/shr.el (shr-face-background): Return the first background, because that's the one that's visible (bug#22680).
This commit is contained in:
parent
379a846b85
commit
cad0bc7055
1 changed files with 2 additions and 1 deletions
|
@ -1911,7 +1911,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))))))
|
||||
|
|
Loading…
Add table
Reference in a new issue