Fix: (outline-path) Normalizer infinite loop

Hopefully there aren't more of these lurking, but with the recent
--normalize-query change, there might be...
This commit is contained in:
Adam Porter 2021-06-21 07:55:58 -05:00
parent 482a5c939b
commit e03fb24f9b
2 changed files with 8 additions and 1 deletions

View file

@ -251,6 +251,12 @@ with keyword arg NOW in PLIST."
:to-equal '(link :description "DESCRIPTION" :target "TARGET"
:regexp-p t))))
(describe "(outline-path)"
(it "with a regexp metacharacter"
;; Ensures that normalizer doesn't infinitely loop.
(expect (org-ql--normalize-query '(olp "a." "b"))
:to-equal '(org-ql--predicate-outline-path "a\\." "b"))))
(describe "timestamp predicates"
;; NOTE: (clocked) and (closed) don't accept :with-time arguments.
(describe "(clocked)"