Infinite loop when running `(circadian-activate-current)`

Hello. I am on the latest version of Emacs 30 and running the following code from `emacs -Q`: ```elisp (defvar bootstrap-version) (let ((bootstrap-file (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory)) (bootstrap-version 5)) (unless (file-exists-p bootstrap-file) (with-current-buffer (url-retrieve-synchronously "https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el" 'silent 'inhibit-cookies) (goto-char (point-max)) (eval-print-last-sexp))) (load bootstrap-file nil 'nomessage)) (straight-use-package 'circadian) (require 'calendar) (setq calendar-latitude 28 calendar-longitude -96) (require 'circadian) (setq circadian-themes '((:sunrise . modus-operandi-tinted) (:sunset . modus-vivendi-tinted))) (circadian-activate-current) ``` causes the package to reload the current theme in an infinite loop and consequently this makes the screen flicker a lot.