1 files changed, 18 insertions(+), 15 deletions(-)

M lisp/themes.el

@@ 1,21 1,9 @@
-;; Setup theme
+;; install themes
+
 (use-package gruvbox-theme
   :config
   (load-theme 'gruvbox-dark-hard t t)
-  (load-theme 'gruvbox-light-hard t t)
-
-  (defun dark-theme ()
-    (interactive)
-    (disable-theme 'gruvbox-light-hard)
-    (enable-theme 'gruvbox-dark-hard))
-
-  (defun light-theme ()
-    (interactive)
-    (disable-theme 'gruvbox-dark-hard)
-    (enable-theme 'gruvbox-light-hard))
-
-  ;; dark theme by default
-  (dark-theme))
+  (load-theme 'gruvbox-light-hard t t))
 
 (use-package monokai-theme
   :config


@@ 27,6 15,8 @@
   (load-theme 'doom-one-light t t)
   (load-theme 'doom-vibrant t t))
 
+;; theme functions
+
 (defun switch-theme (theme)
   ;; The (interactive ...) and subsequent (unless ...) code was copied from the
   ;; enable-theme function in custom.el.gz


@@ 46,3 36,16 @@
   (interactive)
   (dolist (thm custom-enabled-themes)
     (disable-theme thm)))
+
+(defun dark-theme ()
+  (interactive)
+  (disable-theme 'gruvbox-light-hard)
+  (enable-theme 'gruvbox-dark-hard))
+
+(defun light-theme ()
+  (interactive)
+  (disable-theme 'gruvbox-dark-hard)
+  (enable-theme 'gruvbox-light-hard))
+
+;; enable dark theme by default
+(dark-theme)