* .emacs.d/lisp/bandali-gnus.el: Drop signature.
[~bandali/configs] / .emacs.d / lisp / bandali-theme.el
index 13929cb..fa5911c 100644 (file)
 
 ;;; Code:
 
-(with-eval-after-load 'package
-  (require 'refinery-theme)
-  (load-theme 'refinery t))
+(when (display-graphic-p)
+  (add-to-list 'load-path (b/lisp "refinery-theme"))
+  (with-eval-after-load 'package
+    (require 'refinery-theme)
+    (load-theme 'refinery t)))
 
 ;; (require 'smart-mode-line)
 ;; ;; thanks, but no thanks; don't make fixed-width fills.
   (interactive)
   (mapc #'disable-theme custom-enabled-themes)
   (load-theme 'refinery t)
-  (when (featurep 'smart-mode-line)
-    (let ((sml/no-confirm-load-theme t))
-      (sml/apply-theme 'respectful)))
   (font-lock-remove-keywords
    'org-mode b/org-mode-font-lock-keywords)
-  (when (featurep 'erc-hl-nicks)
-    (erc-hl-nicks-reset-face-table))
   (when (featurep 'exwm-systemtray)
     (exwm-systemtray--refresh)))
 
   (interactive)
   (mapc #'disable-theme custom-enabled-themes)
   (load-theme 'refinery-dark t)
-  (when (featurep 'smart-mode-line)
-    (let ((sml/no-confirm-load-theme t))
-      (sml/apply-theme 'dark)))
   (font-lock-add-keywords
    'org-mode b/org-mode-font-lock-keywords t)
-  (when (featurep 'erc-hl-nicks)
-    (erc-hl-nicks-reset-face-table))
   (when (featurep 'exwm-systemtray)
     (exwm-systemtray--refresh)))