Subject: Re: bug#79029: 30.1.90; Leuven theme causing strange frame issues?

From: Ken Mankoff <[email-masked]>
Date: Wed, 16 Jul 2025 05:44:47 -0400

Hi Visuwesh,

On 2025-07-15 at 23:21 -04, Visuwesh <[email-masked]> wrote...
> This is a quoting problem.  This should instead say
>
>     `(lui-highlight-face ((,class (:box (:line-width 1 :color
> "#CC0000") :foreground "#CC0000" :background "#FFFF88")))) ; my
> nickname

Yes, that fixes it. Dark theme has the same issue. Patch attached.

  -k.

diff --git a/etc/themes/leuven-dark-theme.el b/etc/themes/leuven-dark-theme.el
index 017cc08110c..ea9b4169f84 100644
--- a/etc/themes/leuven-dark-theme.el
+++ b/etc/themes/leuven-dark-theme.el
@@ -683,7 +683,7 @@ leuven-dark
    `(lsp-ui-doc-background ((,class (:background "#2d2058"))))
    `(lsp-ui-sideline-code-action ((,class (:foreground "#ffffff" :background "#2526c0"))))
    `(lui-button-face ((,class ,link)))
-   `(lui-highlight-face ((,class (:box '(:line-width 1 :color "#38ffff") :foreground "#38ffff" :background "#06017f")))) ; my nickname
+   `(lui-highlight-face ((,class (:box (:line-width 1 :color "#38ffff") :foreground "#38ffff" :background "#06017f")))) ; my nickname
    `(lui-time-stamp-face ((,class (:foreground "#64df19"))))
    `(magit-blame-header ((,class (:inherit magit-diff-file-header))))
    `(magit-blame-heading ((,class (:overline "#5d5862" :foreground "#06ffff" :background "#3c3741"))))
diff --git a/etc/themes/leuven-theme.el b/etc/themes/leuven-theme.el
index 5d38c7071f1..946dfcdc305 100644
--- a/etc/themes/leuven-theme.el
+++ b/etc/themes/leuven-theme.el
@@ -737,7 +737,7 @@ leuven
    `(lsp-ui-doc-background ((,class (:background "#F6FECD"))))
    `(lsp-ui-sideline-code-action ((,class (:foreground "#000000" :background "#FFF68F"))))
    `(lui-button-face ((,class ,link)))
-   `(lui-highlight-face ((,class (:box '(:line-width 1 :color "#CC0000") :foreground "#CC0000" :background "#FFFF88")))) ; my nickname
+   `(lui-highlight-face ((,class (:box (:line-width 1 :color "#CC0000") :foreground "#CC0000" :background "#FFFF88")))) ; my nickname
    `(lui-time-stamp-face ((,class (:foreground "purple"))))
    `(magit-blame-header ((,class (:inherit magit-diff-file-header))))
    `(magit-blame-heading ((,class (:overline "#A7A7A7" :foreground "red" :background "#E6E6E6"))))