emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/gotham-theme 25cfdd0a5e 070/214: Fix underline styles bug


From: ELPA Syncer
Subject: [nongnu] elpa/gotham-theme 25cfdd0a5e 070/214: Fix underline styles bug
Date: Fri, 7 Jan 2022 17:58:42 -0500 (EST)

branch: elpa/gotham-theme
commit 25cfdd0a5eea963d0703c235fef9ffaa30652c0f
Author: Vasilij Schneidermann <v.schneidermann@gmail.com>
Commit: Vasilij Schneidermann <v.schneidermann@gmail.com>

    Fix underline styles bug
---
 gotham-theme.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/gotham-theme.el b/gotham-theme.el
index 38776e83d8..0e15409329 100644
--- a/gotham-theme.el
+++ b/gotham-theme.el
@@ -105,11 +105,12 @@ depending on DISPLAY for keys which are either 
:foreground or
                           ((eq display 'tty) 2)))
              (color (nth index (assoc value gotham-color-alist))))
         (cond
-         ((memq key '(:foreground :background :overline :color))
-          (setq output (append output (list key color))))
          ((and (memq key '(:box :underline)) (listp value))
           (setq output (append output
                                (list key (gotham-transform-spec value 
display)))))
+         ((and (memq key '(:foreground :background :underline :overline 
:color))
+               color)
+          (setq output (append output (list key color))))
          (t (setq output (append output (list key value))))))
       (setq spec (cddr spec)))
     output))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]