all repos — nixfiles @ 695aae6f8f557422493588c25d28cf8a6d1f9021

System and user configuration, managed by nix and home-manager

theme: init module

Alan Pearce
commit

695aae6f8f557422493588c25d28cf8a6d1f9021

parent

872cd3b932d0e92c587510eac76ee87807ff0747

1 file changed, 0 insertions(+), 50 deletions(-)

changed files
M user/settings/emacs/init.el → user/settings/emacs/init.el
@@ -70,56 +70,6 @@
;; Don't ring the bell (setq ring-bell-function #'ignore) -(use-package doom-themes - :if (or (daemonp) - window-system) - :config (progn - (doom-themes-org-config))) - -(let ((light-mode-theme 'doom-one-light) - (dark-mode-theme 'doom-one)) - (load-theme light-mode-theme :noconfirm :noenable) - (load-theme dark-mode-theme :noconfirm :noenable) - - (defun my/switch-theme-variant (mode) - (interactive (list - (intern (completing-read "Make it: " '("light" "dark") nil t)))) - (cond - ((eq mode 'dark) - (disable-theme light-mode-theme) - (enable-theme dark-mode-theme)) - ((eq mode 'light) - (disable-theme dark-mode-theme) - (enable-theme light-mode-theme))) - (modify-all-frames-parameters '((ns-appearance mode)))) - - (defun my/system-appearance () - (if (and (eq system-type 'darwin) - (string-equal - "Dark" - (string-trim-right (shell-command-to-string "defaults read -g AppleInterfaceStyle")))) - 'dark - 'light)) - - (defun my/match-theme-system-appearance () - (interactive) - (my/switch-theme-variant (my/system-appearance))) - - (my/switch-theme-variant (my/system-appearance)) - - (use-package kqueue - :if (eq window-system 'ns) - :config (progn - (defun my/gp-notify-callback (event) - (let* ((filename (elt event 2)) - (basename (file-name-nondirectory filename))) - (when (string-equal basename ".GlobalPreferences.plist") - (my/match-theme-system-appearance)))) - (setq my/kq-watcher-global-preferences - (kqueue-add-watch (expand-file-name "~/Library/Preferences/") - '(write) - #'my/gp-notify-callback))))) - (use-package exec-path-from-shell :if (eq system-type 'darwin) :config (progn