PERF/circadian.el: use memoized sunset & sunrise times (#29)

guidoschmidt · Oct 27, 2023 · b3bb940 · b3bb940
1 parent 52e336d
commit b3bb940
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/circadian.el b/circadian.el
@@ -166,12 +166,12 @@
          (let  ((sunrise (circadian-sunrise)))
            (if (equal sunrise "not")
                (error "Could not get valid sunset time — check your time zone settings"))
-           (circadian-sunrise)))
+           sunrise))
         ((cl-equalp input :sunset)
          (let ((sunset (circadian-sunset)))
            (if (equal sunset "on")
                (error "Could not get valid sunset time — check your time zone settings"))
-           (circadian-sunset)))
+           sunset))
         ((stringp input) (circadian--string-to-time input))))
 
 ;;;###autoload