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

Add: Predicates outline-path, outline-path-segment

Browse source
This commit is contained in:
Adam Porter 2019-10-07 12:41:23 -05:00
parent 8d680a8e79
commit c06e5518eb
3 changed files with 96 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -479,6 +479,25 @@ RESULTS should be a list of strings as returned by
(org-ql-expect ((heading "Take over" "world"))
'("Take over the world"))))
(describe "(outline-path)"
(org-ql-it "with one argument"
(org-ql-expect ((outline-path "symphony"))
'("Write a symphony")))
(org-ql-it "with two arguments"
(org-ql-expect ((outline-path "idea" "symphony"))
'("Write a symphony"))))
(describe "(outline-path-segment)"
(org-ql-it "with one argument"
(org-ql-expect ((outline-path-segment "symphony"))
'("Write a symphony")))
(org-ql-it "with a contiguous segment"
(org-ql-expect ((outline-path-segment "idea" "symphony"))
'("Write a symphony")))
(org-ql-it "with a non-contiguous segment"
(org-ql-expect ((outline-path-segment "data" "symphony"))
nil)))
(describe "(path)"
(org-ql-it "without arguments"
(org-ql-expect ((path))