FIX typo
This commit is contained in:
parent
34817889b6
commit
24dd5e68e0
|
@ -1437,12 +1437,12 @@ used for optimization."
|
|||
(-if-let (q (funcall get-planned id committed-ids))
|
||||
(to-valid id :quarterly q)
|
||||
(->> (list "Linked to scheduled action that isn't on QTP" id)
|
||||
(either :left)))))
|
||||
(either :left))))))
|
||||
(-if-let (w (->> (funcall get-planned id committed-ids)
|
||||
(--mapcat (org-x-dag-ht-get-maybe ht-q it :planned))))
|
||||
(to-valid id :weekly w)
|
||||
(->> (list "Linked to unscheduled action that isn't on WKP" id)
|
||||
(either :left)))))))
|
||||
(either :left))))))
|
||||
(is-valid-action
|
||||
(lambda (adjlist id)
|
||||
(-if-let (c (org-x-dag-ht-get-maybe ht-a id :committed))
|
||||
|
|
Loading…
Reference in New Issue