Use the new 'margin' face in Flymake (bug#80693)

* lisp/progmodes/flymake.el (flymake--bs-display):
Use the 'margin' face when it's available.
This commit is contained in:
Juri Linkov 2026-05-12 18:42:42 +03:00
parent 07f2bbc905
commit 20d17df3f4

View file

@ -2428,7 +2428,10 @@ symbol `fringes' or the symbol `margins'."
`((margin ,flymake-margin-indicator-position) `((margin ,flymake-margin-indicator-position)
,(propertize ,(propertize
indicator-car indicator-car
'face `(:inherit (,(cdr valuelist) default)) 'face `(:inherit (,(cdr valuelist)
,(if (facep 'margin)
'margin
'default)))
'mouse-face 'highlight 'mouse-face 'highlight
'help-echo "Open Flymake diagnostics" 'help-echo "Open Flymake diagnostics"
'keymap (let ((map (make-sparse-keymap))) 'keymap (let ((map (make-sparse-keymap)))