parent
1198284c7e
commit
e2a1d16cc4
1 changed files with 14 additions and 0 deletions
|
|
@ -257,6 +257,20 @@ with keyword arg NOW in PLIST."
|
||||||
(expect (org-ql--normalize-query '(olp "a." "b"))
|
(expect (org-ql--normalize-query '(olp "a." "b"))
|
||||||
:to-equal '(org-ql--predicate-outline-path "a\\." "b"))))
|
:to-equal '(org-ql--predicate-outline-path "a\\." "b"))))
|
||||||
|
|
||||||
|
(describe "(tags-inherited)"
|
||||||
|
(expect (org-ql--normalize-query '(tags-inherited))
|
||||||
|
:to-equal '(tags-inherited))
|
||||||
|
(expect (org-ql--normalize-query '(itags))
|
||||||
|
:to-equal '(tags-inherited))
|
||||||
|
(expect (org-ql--normalize-query '(tags-inherited "foo"))
|
||||||
|
:to-equal '(tags-inherited "foo"))
|
||||||
|
(expect (org-ql--normalize-query '(itags "foo"))
|
||||||
|
:to-equal '(tags-inherited "foo"))
|
||||||
|
(expect (org-ql--normalize-query '(tags-inherited "foo" "bar"))
|
||||||
|
:to-equal '(tags-inherited "foo" "bar"))
|
||||||
|
(expect (org-ql--normalize-query '(itags "foo" "bar"))
|
||||||
|
:to-equal '(tags-inherited "foo" "bar")))
|
||||||
|
|
||||||
(describe "timestamp predicates"
|
(describe "timestamp predicates"
|
||||||
;; NOTE: (clocked) and (closed) don't accept :with-time arguments.
|
;; NOTE: (clocked) and (closed) don't accept :with-time arguments.
|
||||||
(describe "(clocked)"
|
(describe "(clocked)"
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue