jiri/org-ql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

WIP: (logbook) predicate

Browse source
This commit is contained in:
Adam Porter 2022-03-07 13:49:45 -06:00
parent af18eac2b8
commit 73871e04e0
2 changed files with 78 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
tests/test-org-ql.el
View file

@ -245,6 +245,13 @@ with keyword arg NOW in PLIST."
:to-equal '(link :description "DESCRIPTION" :target "TARGET"
:regexp-p t))))
(describe "(logbook)"
(it "with only string argument"
(expect (org-ql--normalize-query '(logbook "String ending in a period."))
:to-equal '(logbook "String ending in a period\\\."))
(expect (org-ql--query-string-to-sexp "logbook:called")
:to-equal '(logbook "called"))))
(describe "(outline-path)"
(it "with a regexp metacharacter"
;; Ensures that normalizer doesn't infinitely loop.