/Users/yaesposi/y/her.esy.fun/src/posts/0014-change-emacs-theme-automatically/index.org

This commit is contained in:
Yann Esposito (Yogsototh) 2020-09-22 08:11:14 +02:00
parent fa9cf38fcb
commit da1f2bf629
Signed by untrusted user who does not match committer: yogsototh
GPG key ID: 7B19A4C650D59646

View file

@ -28,10 +28,10 @@ And also, I wanted that to follow my working hours and not really the sun.
I might change my mind and use the code of theme-changer to follow the I might change my mind and use the code of theme-changer to follow the
curve of the sun. curve of the sun.
But for now, just using straight hours should be good enough. But for now, just using straight hours should be good enough.
So here is my piece of code I added to my doom-emacs configuration: So here is my piece of code I added to my doom-emacs =config.el=:
#+BEGIN_SRC elisp #+BEGIN_SRC elisp
(defun y/update-theme () (defun y/auto-update-theme ()
"depending on time use different theme" "depending on time use different theme"
;; very early => gruvbox-light, solarized-light, nord-light ;; very early => gruvbox-light, solarized-light, nord-light
(let* ((hour (nth 2 (decode-time (current-time)))) (let* ((hour (nth 2 (decode-time (current-time))))
@ -44,10 +44,12 @@ So here is my piece of code I added to my doom-emacs configuration:
(when (not (equal doom-theme theme)) (when (not (equal doom-theme theme))
(setq doom-theme theme) (setq doom-theme theme)
(load-theme doom-theme) (load-theme doom-theme)
(run-at-time (format )) ;; run that function again next hour
))) (run-at-time (format "%02d:%02d" (+ hour 1) 0) nil 'y/update-time))))
(y/update-theme) (y/auto-update-theme)
;; try to update the theme every minute
(run-with-idle-timer 0 60 'y/update-theme)
#+END_SRC #+END_SRC
I'm still playing with it.
So there still might be a bug.
So far, it's good.