mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
Introduce face for <code> elements in shr
* lisp/net/shr.el (shr-tag-code): Don't use the `default' font, because it has properties that will override surrounding elements (like <a...>) (bug#39504).
This commit is contained in:
parent
734eb7e457
commit
b7d5a64f40
1 changed files with 1 additions and 1 deletions
|
|
@ -1440,7 +1440,7 @@ ones, in case fg and bg are nil."
|
|||
(shr-fontize-dom dom 'underline))
|
||||
|
||||
(defun shr-tag-code (dom)
|
||||
(let ((shr-current-font 'default))
|
||||
(let ((shr-current-font 'fixed-pitch))
|
||||
(shr-generic dom)))
|
||||
|
||||
(defun shr-tag-tt (dom)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue