dark theme tweaks

2 files changed, 18 insertions, 14 deletions

diff --git a/lib/themes/jao-dark-theme.el b/lib/themes/jao-dark-theme.el
index 608806a..9e07f1a 100644
--- a/lib/themes/jao-dark-theme.el
+++ b/lib/themes/jao-dark-theme.el
@@ -16,6 +16,9 @@
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
 
+(defvar jao-theme-dark-bold
+  (if (> emacs-major-version 28) 'medium 'semibold))
+
 (jao-define-custom-theme jao-dark
   (:names (bg "#282b33" nil nil)
           (bg-alt "#1f2024" nil nil)
@@ -49,6 +52,9 @@
           (success "#5b94ab")
           (warning "#cfcf9c")
           (warning2 "#ECBE7B"))
+  (:face-family "Fira Code")
+  (:face-size 9)
+  (:bold-weight jao-theme-dark-bold)
   (:palette (fg "#c6c6c6")
             (bg "#1f2024")
             (box "grey25")
@@ -100,12 +106,12 @@
             (gnus-cite-2 (c fg-1))
             (gnus-cite-3 (c fg-2))
             (gnus-cite-4 (c fg-2))
-            (gnus-group-mail-3 (c yellow))
-            (gnus-group-mail-3-empty (c fg-0.5))
-            (gnus-group-news-3 (~ gnus-group-mail-3))
-            (gnus-group-news-3-empty (~ gnus-group-mail-3-empty))
-            (gnus-group-mail-low (p f10))
-            (gnus-group-mail-low-empty (~ gnus-group-mail-3-empty))
+            ;; (gnus-group-mail-3 (c yellow))
+            ;; (gnus-group-mail-3-empty (c fg-0.5))
+            ;; (gnus-group-news-3 (~ gnus-group-mail-3))
+            ;; (gnus-group-news-3-empty (~ gnus-group-mail-3-empty))
+            ;; (gnus-group-mail-low (p f10))
+            ;; (gnus-group-mail-low-empty (~ gnus-group-mail-3-empty))
             (gnus-summary-cancelled  (c "dark slate gray" nil) st)
             (gnus-summary-selected (p warning) nul nbf)
             (header-line (p hilite))
@@ -118,17 +124,13 @@
             (org-hide (c 0 nil))
             (org-code (c yellow))
             (scroll-bar (c bg))
-            (term-color-blue (c nil nil) it)
-            (vterm-color-blue (c "steelblue4" nil))
             (show-paren-match (c "darkseagreen1" "#5f5f5f"))
-            (variable-pitch (c nil nil))
+            (shr-link (c blue) (ul dark-blue))
             (vertical-border (c "black") :inherit nil)
-            (vertico-group-separator (p dimm) :strike-through "#6f6f6f")
-            (w3m-image (c green) nbx it)
-            (w3m-bold (c yellow))))
+            (vertico-group-separator (p dimm) :strike-through "#6f6f6f")))
 
 ;; (enable-theme 'jao-dark)
-;; (jao-minibuffer-mode-line-adjust-faces)
+;; (jao-mode-line-adjust-faces)
 
 
 (provide 'jao-dark-theme)
diff --git a/lib/themes/jao-light-theme.el b/lib/themes/jao-light-theme.el
index 6f57524..d9bf1f0 100644
--- a/lib/themes/jao-light-theme.el
+++ b/lib/themes/jao-light-theme.el
@@ -16,6 +16,8 @@
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
 
+(defvar jao-theme-light-bold (if (> emacs-major-version 28) 'medium 'semibold))
+
 (jao-define-custom-theme jao-light
   (:names (bg1 "gray98")
           (bg2 "gray95")
@@ -43,7 +45,7 @@
           (green "#005555"))
   (:face-family "Fira Code")
   (:face-size 9)
-  (:bold-weight 'semibold)
+  (:bold-weight jao-theme-dark-bold)
   (:palette (fg "black")
             (bg "white")
             (box "gray80")