From 9bc3138ff8ec72277dc777d13645a0177792ed39 Mon Sep 17 00:00:00 2001 From: Adam Porter Date: Wed, 11 Sep 2019 22:07:59 -0500 Subject: [PATCH] Tests: Add (heading) --- tests/test-org-ql.el | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/tests/test-org-ql.el b/tests/test-org-ql.el index 11ee176..510abee 100644 --- a/tests/test-org-ql.el +++ b/tests/test-org-ql.el @@ -411,6 +411,16 @@ RESULTS should be a list of strings as returned by (org-ql-expect ((habit)) '("Practice leaping tall buildings in a single bound"))) + (describe "(heading)" + (org-ql-it "with one argument" + (org-ql-expect ((heading "world")) + ;; NOTE: This--correctly--does not match the "Skype with president of + ;; Antarctica" heading, which has the tag ":world:" in its heading line. + '("Take over the world"))) + (org-ql-it "with two arguments" + (org-ql-expect ((heading "Take over" "world")) + '("Take over the world")))) + (describe "(path)" (org-ql-it "without arguments" (org-ql-expect ((path))