diff options
author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2024-08-27 15:40:08 +0100 |
---|---|---|
committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2024-08-27 15:40:08 +0100 |
commit | 70ee7389a19437d66ba58af0296d0a7cd176efa2 (patch) | |
tree | 0e344e90ef08a375accc2d769f4b9797bd775550 | |
parent | 41ccade907cd719f82c5a6deb82afd7a477a3ec5 (diff) | |
download | dotfiles-70ee7389a19437d66ba58af0296d0a7cd176efa2.tar.gz dotfiles-70ee7389a19437d66ba58af0296d0a7cd176efa2.tar.bz2 dotfiles-70ee7389a19437d66ba58af0296d0a7cd176efa2.zip |
(Emacs/config)+timer to sync theme based on hour
-rw-r--r-- | Emacs/.config/emacs/config.org | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/Emacs/.config/emacs/config.org b/Emacs/.config/emacs/config.org index b1aaf59..8f0ac21 100644 --- a/Emacs/.config/emacs/config.org +++ b/Emacs/.config/emacs/config.org @@ -278,7 +278,14 @@ eyes too much. (setq +oreo/theme (mod (+ 1 +oreo/theme) (length +oreo/theme-list))) (+oreo/load-theme)) - (+oreo/load-theme)) + (defun +oreo/sync-theme () + (let ((hour (read (format-time-string "%H")))) + (setq +oreo/theme + (if (or (< hour 8) (> hour 18)) + 1 + 0)) + (+oreo/load-theme))) + (run-at-time nil (* 60 60) #'+oreo/sync-theme)) #+end_src ** Font size Adjust font sizes for my devices. |