FIX use supplied epoch time

2021-08-28 23:32:24 -04:00 · 2021-08-28 23:32:24 -04:00 · 5f756e3406
parent db2b0f74e5
commit 5f756e3406
1 changed files with 1 additions and 1 deletions
--- a/local/lib/org-x/org-x.el
+++ b/local/lib/org-x/org-x.el
@ -281,7 +281,7 @@ entire subtrees to save time and ignore tasks")

 EPOCH-TIME is an integer/float for the created time. If nil, use
 the current time."
-  (let ((ts (->> (float-time)
+  (let ((ts (->> (or epoch-time (float-time))
                 (org-ml-unixtime-to-time-long)
                 (org-ml-build-timestamp!)
                 (org-ml-to-string))))