From 6aa65e4adff5a2a0f6958d78b838c83ff8bbf163 Mon Sep 17 00:00:00 2001 From: ndwarshuis Date: Tue, 3 May 2022 19:17:27 -0400 Subject: [PATCH] FIX typos --- local/lib/org-x/org-x-dag.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/local/lib/org-x/org-x-dag.el b/local/lib/org-x/org-x-dag.el index 93bdbfb..3b95aa7 100644 --- a/local/lib/org-x/org-x-dag.el +++ b/local/lib/org-x/org-x-dag.el @@ -813,7 +813,7 @@ used for optimization." (new-proj))) ((equal o org-x-kw-next) (new-proj :proj-active)) ((equal o org-x-kw-wait) (new-proj :proj-wait)) - ((equal o org-x-kw-hold) (new-proj :proj-hold)) + ((equal o org-x-kw-hold) (new-proj :proj-held)) (t (org-x-dag-bs-error-kw "Task action" o))))) (e (error "Pattern fail: %s" e)))))) (child-bss @@ -2704,7 +2704,7 @@ FUTURE-LIMIT in a list." (-when-let (priority (cl-case status (:proj-active 4) (:proj-wait 3) - (:proj-hold 2) + (:proj-held 2) (:proj-stuck 1))) (-when-let ((&plist :committed) (-when-let (ns (org-x-dag-id->ns it)) (either-from-right ns nil))) @@ -3997,7 +3997,7 @@ FUTURE-LIMIT in a list." "Active Project") (`(:sp-proj :proj-wait) "Waiting Project") - (`(:sp-proj :proj-hold) + (`(:sp-proj :proj-held) "Held Project") (`(:sp-proj :proj-stuck) "Stuck Project")