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

FIX typos

This commit is contained in:
Nathan Dwarshuis 2022-04-19 23:54:31 -04:00
parent 3988971575
commit 0cf3695f06
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -1354,7 +1354,7 @@ used for optimization."
((get-planned
(htbl ids)
(--mapcat (org-x-dag-ht-get-maybe htbl it :planned) ids)))
(-let (((&alist :endpoint ht-e
(-let* (((&alist :endpoint ht-e
:lifetime ht-l
:survival ht-s
:quarterly ht-q)
@ -1378,7 +1378,7 @@ used for optimization."
(either :right `(:committed ,s :survivalp t)))
(t
(either :right `(:committed (,@e ,@l) :survivalp nil))))
(ht-set this-h id this-ns))
(ht-set this-h id))
(when (-some->> (org-x-dag-adjlist-id-hl-meta-prop adjlist :planning id)
(org-ml-get-property :scheduled))
(->> (-union (get-planned ht-e e) (get-planned ht-l l))
@ -1400,7 +1400,7 @@ used for optimization."
(org-x-dag-ht-add-links id htbl :planned)))
(get-planned-ht
(htbl id)
(--mapcat (org-x-dag-ht-get-maybe ht-e it :planned) c))
(--mapcat (org-x-dag-ht-get-maybe htbl it :planned) c))
(get-sched
(id)
(-some->> (org-x-dag-adjlist-id-hl-meta-prop adjlist :planning id)