From 6908154d8f34edfc3b8ddc5adc8c88d555483b09 Mon Sep 17 00:00:00 2001
From: ndwarshuis <natedwarshuis@gmail.com>
Date: Sun, 14 Apr 2019 11:36:33 -0400
Subject: [PATCH] added error for future created timestamps

---
 conf.org | 17 ++++++++++++-----
 1 file changed, 12 insertions(+), 5 deletions(-)

diff --git a/conf.org b/conf.org
index d1aa1c7..c31ad88 100644
--- a/conf.org
+++ b/conf.org
@@ -2468,11 +2468,18 @@ original org entry before executing BODY."
           (:name "Missing Creation Timestamp" :pred
                  ,(nd/org-x-mk-super-agenda-pred
                    ;; TODO extend this to non-todoitems
-                   (let ((keyword (org-x-is-todoitem-p)))
-                     (and keyword
-                          (org-x-is-task-p)
-                          (not (member keyword org-done-keywords))
-                          (not (org-x-is-created-heading-p))))))
+                   (-when-let (kw (org-x-is-task-p))
+                     (and
+                      (not (member kw org-done-keywords))
+                      (not (org-x-is-created-heading-p))))))
+          (:name "Future Creation Timestamp" :pred
+                 ,(nd/org-x-mk-super-agenda-pred
+                   ;; TODO extend this to non-todoitems
+                   (-when-let (kw (org-x-is-task-p))
+                     (and
+                      (not (member kw org-done-keywords))
+                      (org-x-heading-compare-timestamp
+                       #'org-x-is-created-heading-p 0 t)))))
           (:discard (:anything t))))))))
 
    ("A"