circadian.el

circadian.el copied to clipboard

(use-package circadian
  :config
  (setq circadian-themes '(
			   ("8:00" . doom-outrun-electric)
			   ("9:00" . alect-dark-alt)
			   ("10:00" . misterioso)
			   ("11:00" . doom-snazzy)
			   ("12:00" . birds-of-paradise-plus)
			   ("13:00" . doom-oceanic-next)
			   ("14:00" . wombat)
			   ("15:00" . wheatgrass)
			   ("16:00" . doom-palenight)
			   ("17:00" . doom-nova)
			   ("18:00" . doom-acario-dark)
			   (:sunset  . github-modern) ; 19:05
			   ("21:00" . adwaita)
			   ("22:00" . dichromacy)
			   ("23:00" . doom-acario-light)
			   ))
  (circadian-setup))

At current time 2020-08-25 13:10:00 . I eval last config then the theme doom-oceanic-next enabled, but when I checked timer-list variable

( [nil 24388 40706 309167 nil undo-auto--boundary-timer nil nil 0]
  [nil 24388 40737 26724 60 ac-clear-variables-every-minute nil nil 0]
  [nil 24389 6496 0 nil circadian-activate-latest-theme nil nil 0])
;; (format-time-string
;;  "%Y-%m-%d %H:%M:%S %z"
;;  '(24389 6496 0)
;; )
;; => "2020-08-25 22:00:00 +0800"  run circadian-activate-latest-theme function

I saw the circadian-activate-latest-theme function next run at 2020-08-25 22:00:00

but it should not be running at 14:00 (for wombat theme) as circadian-themes variable defined

change circadian--encode-time function delete encode-time zone param to keep decode-time and encode-time zone the same. solved!

 (defun circadian--encode-time (hour min)
  "Encode HOUR hours and MIN minutes into a valid format for `run-at-time'."
  (let ((now (decode-time)))
    (let ((day (nth 3 now))
          (month (nth 4 now))
          (year (nth 5 now)))
      (encode-time 0 min hour day month year))))

@emacle Do you have calendar-latitude and calendar-longitude set in your config?

You can find your places lat/long coordinates e.g. via www.latlong.net and then set this before using circadian:

(setq calendar-latitude $YOUR_LAT_VALUE)
(setq calendar-longitude $YOUR_LNG_VALUE)