summary refs log tree commit diff stats
path: root/user/emacs
diff options
context:
space:
mode:
Diffstat (limited to 'user/emacs')
-rw-r--r--user/emacs/init.el39
1 files changed, 12 insertions, 27 deletions
diff --git a/user/emacs/init.el b/user/emacs/init.el
index d7932e3c..487d93ad 100644
--- a/user/emacs/init.el
+++ b/user/emacs/init.el
@@ -67,36 +67,21 @@
 
 (when (or (daemonp)
           window-system)
-  (use-package modus-themes
+  (use-package stimmung-themes
     :config (progn
-              (let ((light-mode-theme 'modus-operandi)
-                    (dark-mode-theme 'modus-vivendi-tinted))
-                (setq modus-themes-common-palette-overrides
-                      `((builtin magenta)
-                        (comment yellow-faint)
-                        (constant magenta-cooler)
-                        (docstring green-faint)
-                        (docmarkup magenta-faint)
-                        (fnname magenta-warmer)
-                        (keyword cyan)
-                        (preprocessor cyan-cooler)
-                        (string green-cooler)
-                        (type magenta-cooler)
-                        (variable blue-warmer)
-                        (rx-construct magenta-warmer)
-                        (rx-backslash blue-cooler)
-                        (border-mode-line-active unspecified)
-                        (border-mode-line-inactive unspecified)
-                        (bg-mode-line-active bg-blue-subtle)
-                        (fg-mode-line-active fg-main)
-                        (fg-line-number-inactive "gray50")
-                        (fg-line-number-active fg-main)
-                        (bg-line-number-active bg-dim)
-                        ,@modus-themes-preset-overrides-faint)
-                      modus-themes-to-toggle `(,light-mode-theme ,dark-mode-theme))
+              (let ((light-mode-theme 'stimmung-themes-light)
+                    (dark-mode-theme 'stimmung-themes-dark)
+                    (original-stimmung-themes-string  stimmung-themes-string))
                 (load-theme light-mode-theme :noconfirm :noenable)
                 (load-theme dark-mode-theme :noconfirm :noenable)
-                (enable-theme light-mode-theme))))
+                (enable-theme light-mode-theme)
+                (defun toggle-stimmung-string-highlighting ()
+                  (interactive)
+                  (let ((current-theme (car custom-enabled-themes)))
+                    (setq stimmung-themes-string (if (eq stimmung-themes-string original-stimmung-themes-string)
+                                                     'none
+                                                   original-stimmung-themes-string))
+                    (load-theme current-theme :noconfirm))))))
   (if (eq window-system 'x)
       (setq-default line-spacing 0.2)))