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

Change: (regexp) Accept multiple regexps

Browse source
This commit is contained in:
Adam Porter 2019-07-16 12:33:52 -05:00
parent 7068322757
commit 7dcdc21ea1
3 changed files with 19 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -255,6 +255,18 @@
:action (org-ql-test-org-get-heading))
:to-equal '("Learn universal sign language")))
(describe "(regexp)"
(it "with 1 argument"
(expect (org-ql test-buffer
(regexp "Take over")
:sort todo
:action (org-ql-test-org-get-heading)) :to-equal '("Take over the universe" "Take over the world" "Take over Mars" "Take over the moon" "Get haircut")))
(it "with 2 arguments"
(expect (org-ql test-buffer
(regexp "Take over" "pizza")
:sort todo
:action (org-ql-test-org-get-heading)) :to-equal '("Take over the universe" "Take over the world" "Take over Mars" "Take over the moon" "Order a pizza" "Get haircut"))))
(describe "(ts)"
(it "without arguments"
(expect (org-ql test-buffer