From: João Távora <joaotavora@gmail.com>
Date: Thu, 8 May 2025 11:15:24 +0000 (+0100)
Subject: Flymake: tweak 'fancy' eol diagnostic display
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=acfd55be067004f1afbff67c6edca12767565a60;p=emacs.git

Flymake: tweak 'fancy' eol diagnostic display

When calculating the face for boxdraw chars, protect against
diagnostics with an empty first line.  Also don't inherit from
:default, which seems to mess up the background color when using
hl-line-mode.

* lisp/progmodes/flymake.el (flymake--eol-draw-fancy): Tweak

(cherry picked from commit 64eb60bd91dbeed458d5a410e6dc9ab4e9e0a10e)
---

diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el
index 8968df8c5fd..e837dc70b19 100644
--- a/lisp/progmodes/flymake.el
+++ b/lisp/progmodes/flymake.el
@@ -2270,11 +2270,11 @@ defaults to all project diagnostics."
      for height-to-clear = 0 then ret
      for i from 0
      for adjust = (* i 2)
-     for face = `(:inherit default
-                           :foreground
-                           ,(face-attribute
-                             (get-text-property 0 'face text)
-                             :foreground nil t))
+     for face = `(:foreground
+                  ,(face-attribute
+                    (or (get-text-property 0 'face text)
+                        'flymake-error)
+                    :foreground nil t))
      for text-beg-col = (max (- (max 30 (+ line-beg-col 5)) adjust) (+ line-beg-col 1))
      for text-end-col = (max 100 (+ text-beg-col 40))
      for ret = (flymake--eol-draw-fancy-1