From 31bbc5f5c4d5bc0e1145800fd34eb83b0599582d Mon Sep 17 00:00:00 2001 From: David Florness Date: Sat, 6 Feb 2021 10:57:54 -0500 Subject: [PATCH] Write functions to switch between dark/light themes and enable the dark theme by default --- lisp/appearance.el | 18 ++++++++++++++++-- 1 file changed, 16 insertions(+), 2 deletions(-) diff --git a/lisp/appearance.el b/lisp/appearance.el index fd34e1f..53ddaa0 100644 --- a/lisp/appearance.el +++ b/lisp/appearance.el @@ -29,8 +29,22 @@ ;; Setup theme (use-package gruvbox-theme - :defer t) -(load-theme 'gruvbox-dark-hard t) + :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)) ;; Transparency control (defvar new-frames-are-transparent t -- 2.38.4