aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--chime.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/chime.el b/chime.el
index 08c9632..6e89aa9 100644
--- a/chime.el
+++ b/chime.el
@@ -606,7 +606,7 @@ for org-agenda-files to be populated)."
Comparison is performed by converted each element of LIST onto string
in order to ignore seconds."
(->> list
- (--map (format-time-string "%d:%H:%M" it))
+ (--map (format-time-string "%Y-%m-%d %H:%M" it))
(-uniq)
(length)
(= 1)))
@@ -623,8 +623,8 @@ Returns nil if TIMESTAMP or INTERVAL is invalid."
(and timestamp
interval
(numberp interval)
- ;; Validate timestamp is a proper time value (list of integers)
- (listp timestamp)
+ ;; Validate timestamp is a proper time value (accepts list, integer, or float)
+ (or (listp timestamp) (numberp timestamp))
(chime--time=
(time-add (current-time) (seconds-to-time (* 60 interval)))
timestamp)))