diff --git a/local/lib/org-x/org-x-dag.el b/local/lib/org-x/org-x-dag.el
index b13dff1..af360ee 100644
--- a/local/lib/org-x/org-x-dag.el
+++ b/local/lib/org-x/org-x-dag.el
@@ -3126,11 +3126,9 @@ FUTURE-LIMIT in a list."
   (let ((span (org-x-dag->weekly-span)))
     (org-x-dag-with-ids files
       (pcase (either-from-right (org-x-dag-id->bs it) nil)
-        (`(:weekly :active ,p)
-         (-let* (((&plist :date d :offset o) p)
-                 (abs (+ d o))
-                 (day (->> (calendar-gregorian-from-absolute abs)
-                           (calendar-day-of-week))))
+        (`(:weekly :leaf :active ,abs)
+         (let ((day (->> (calendar-gregorian-from-absolute abs)
+                         (calendar-day-of-week))))
            (when (interval-contains-p abs span)
              (let ((ns (-some-> (org-x-dag-id->ns it)
                          (either-from (-const nil) #'identity)))