ndwarshuis
/
emacs-config
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

FIX typo

This commit is contained in:
Nathan Dwarshuis 2022-04-21 23:51:36 -04:00
parent 34817889b6
commit 24dd5e68e0
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
local/lib/org-x/org-x-dag.el
View File

@ -1437,12 +1437,12 @@ used for optimization."
(-if-let (q (funcall get-planned id committed-ids)) (-if-let (q (funcall get-planned id committed-ids))
(to-valid id :quarterly q) (to-valid id :quarterly q)
(->> (list "Linked to scheduled action that isn't on QTP" id) (->> (list "Linked to scheduled action that isn't on QTP" id)
(either :left))))) (either :left))))))
(-if-let (w (->> (funcall get-planned id committed-ids) (-if-let (w (->> (funcall get-planned id committed-ids)
(--mapcat (org-x-dag-ht-get-maybe ht-q it :planned)))) (--mapcat (org-x-dag-ht-get-maybe ht-q it :planned))))
(to-valid id :weekly w) (to-valid id :weekly w)
(->> (list "Linked to unscheduled action that isn't on WKP" id) (->> (list "Linked to unscheduled action that isn't on WKP" id)
(either :left))))))) (either :left))))))
(is-valid-action (is-valid-action
(lambda (adjlist id) (lambda (adjlist id)
(-if-let (c (org-x-dag-ht-get-maybe ht-a id :committed)) (-if-let (c (org-x-dag-ht-get-maybe ht-a id :committed))