This commit is contained in:
Ihor Radchenko 2021-04-17 16:27:12 +08:00
parent 67618c45cf
commit 567c4c4e42
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B

View file

@ -543,7 +543,7 @@ with keyword arg NOW in PLIST."
(it "all clauses have preambles"
(expect (org-ql--query-preamble '(or (regexp "a") (regexp "b")))
:to-equal (list :query '(or (regexp "a") (regexp "b"))
:preamble (rx-to-string `(or (regexp "a") (regexp "b")))
:preamble (rx-to-string `(or (regexp "b") (regexp "a")))
:preamble-case-fold t)))
(it "some clauses miss preambles"
(expect (org-ql--query-preamble '(or (regexp "a") (+ 1 1)))