ENH include all tags in agenda
This commit is contained in:
parent
7d7225cb00
commit
95250494c8
|
@ -2935,9 +2935,7 @@ FUTURE-LIMIT in a list."
|
||||||
(-when-let (pts (-some->> (org-x-dag-id->planning-timestamp which id)
|
(-when-let (pts (-some->> (org-x-dag-id->planning-timestamp which id)
|
||||||
(org-x-dag-partition-timestamp)))
|
(org-x-dag-partition-timestamp)))
|
||||||
(-when-let (ds (get-datetimes donep dt-fun pts))
|
(-when-let (ds (get-datetimes donep dt-fun pts))
|
||||||
(-let ((tags (if (eq (org-x-dag-id->group id) :daily)
|
(-let ((tags (org-x-dag-id->tags id))
|
||||||
(org-x-dag-id->local-tags id)
|
|
||||||
(org-x-dag-id->tags id)))
|
|
||||||
((&plist :pos) pts))
|
((&plist :pos) pts))
|
||||||
(--map (list :pos pos :datetime it :tags tags :id id) ds)))))
|
(--map (list :pos pos :datetime it :tags tags :id id) ds)))))
|
||||||
(scheduled-datetimes
|
(scheduled-datetimes
|
||||||
|
|
Loading…
Reference in New Issue