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

Merge: 0.5.2

Browse source 
NOTE: Due to changes between 0.5 and 0.6, the fixes don't merge
cleanly, so they will be applied in subsequent commits.  See #220.
This commit is contained in:
Adam Porter 2021-06-16 17:54:33 -05:00
commit 831a21b63e
4 changed files with 107 additions and 76 deletions
Download patch file Download diff file Expand all files Collapse all files

2
tests/data.org
View file

@ -81,7 +81,7 @@ SCHEDULED: <2017-07-05 Wed>
If I don't, the frobnicator will probably fall off halfway to Mars...
Gotta buy one first, though.
Gotta buy one first, though. [[https://example.com/][This one]] looks suitable.
* Recurring
:PROPERTIES:

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

@ -669,7 +669,7 @@ RESULTS should be a list of strings as returned by
(describe "(link)"
(org-ql-it "without arguments"
(org-ql-expect ('(link))
'("/r/emacs")))
'("Fix flux capacitor" "/r/emacs")))
(org-ql-it "with description-or-target"
(org-ql-expect ('(link "emacs"))
'("/r/emacs")))
@ -681,6 +681,18 @@ RESULTS should be a list of strings as returned by
'("/r/emacs")))
(org-ql-it "with :description and :target"
(org-ql-expect ('(link :description "emacs" :target "reddit.com"))
'("/r/emacs")))
(org-ql-it "with description-or-target regexp"
(org-ql-expect ('(link "em.cs" :regexp-p t))
'("/r/emacs")))
(org-ql-it "with :description regexp"
(org-ql-expect ('(link :description "em.cs" :regexp-p t))
'("/r/emacs")))
(org-ql-it "with :target regexp"
(org-ql-expect ('(link :target "em.cs" :regexp-p t))
'("/r/emacs")))
(org-ql-it "with :description and :target regexp"
(org-ql-expect ('(link :description "em.cs" :target "em.cs" :regexp-p t))
'("/r/emacs"))))
(describe "(outline-path)"