diff options
Diffstat (limited to 'tests/test-pearl-org-parse.el')
| -rw-r--r-- | tests/test-pearl-org-parse.el | 13 |
1 files changed, 3 insertions, 10 deletions
diff --git a/tests/test-pearl-org-parse.el b/tests/test-pearl-org-parse.el index e0bb967..731f6ef 100644 --- a/tests/test-pearl-org-parse.el +++ b/tests/test-pearl-org-parse.el @@ -30,15 +30,11 @@ (require 'cl-lib) (defmacro test-pearl--in-org (content &rest body) - "Run BODY in an org-mode temp buffer holding CONTENT, default mapping bound." + "Run BODY in an org-mode temp buffer holding CONTENT." (declare (indent 1)) ;; Declare the Linear keywords so `org-get-todo-state' recognizes them, the ;; way the generated file's `#+TODO:' line does in real use. - `(let ((pearl-state-to-todo-mapping - '(("Todo" . "TODO") ("In Progress" . "IN-PROGRESS") ("Done" . "DONE"))) - (pearl-todo-states-pattern nil) - (pearl--todo-states-pattern-source nil) - (org-todo-keywords '((sequence "TODO" "IN-PROGRESS" "|" "DONE")))) + `(let ((org-todo-keywords '((sequence "TODO" "IN-PROGRESS" "|" "DONE")))) (with-temp-buffer (insert ,content) (org-mode) @@ -107,10 +103,7 @@ "An issue rendered by build-org-content parses back through the reader. Locks the render/parse contract: the LINEAR-* drawer the renderer writes is exactly what the reader extracts, and the rendered keyword is recognized." - (let ((pearl-state-to-todo-mapping '(("In Progress" . "IN-PROGRESS"))) - (pearl-todo-states-pattern nil) - (pearl--todo-states-pattern-source nil) - (org-todo-keywords '((sequence "TODO" "IN-PROGRESS" "|" "DONE")))) + (let ((org-todo-keywords '((sequence "TODO" "IN-PROGRESS" "|" "DONE")))) (let ((content (pearl--build-org-content '((:id "i-1" :identifier "ENG-2" :title "round trip" :priority 2 :state (:name "In Progress") :team (:id "t-1")))))) |