Skip to content

Commit

Permalink
Tests: Rename data2.org to data-file-tags.org
Browse files Browse the repository at this point in the history
It appears likely that we'll need a few test-specific data files, so
we should use descriptive names.
  • Loading branch information
alphapapa committed Mar 9, 2023
1 parent a5fbb5d commit 6c9c0b9
Show file tree
Hide file tree
Showing 2 changed files with 9 additions and 9 deletions.
File renamed without changes.
18 changes: 9 additions & 9 deletions tests/test-org-ql.el
Original file line number Diff line number Diff line change
Expand Up @@ -1409,10 +1409,10 @@ with keyword arg NOW in PLIST."
(org-ql-it "with file tags"
(org-ql-expect ('(tags "food"))
'("Fruit" "Blueberry" "Strawberry" "Vegetable" "Broccoli" "Potato")
:buffer (org-ql-test-data-buffer "data2.org"))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))
(org-ql-expect ('(tags "fruit"))
'("Fruit" "Blueberry" "Strawberry")
:buffer (org-ql-test-data-buffer "data2.org"))))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))))

(describe "(tags-inherited)"

Expand Down Expand Up @@ -1440,10 +1440,10 @@ with keyword arg NOW in PLIST."
(org-ql-it "with file tags"
(org-ql-expect ('(tags-inherited "food"))
'("Fruit" "Blueberry" "Strawberry" "Vegetable" "Broccoli" "Potato")
:buffer (org-ql-test-data-buffer "data2.org"))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))
(org-ql-expect ('(tags-inherited "fruit"))
'("Blueberry" "Strawberry")
:buffer (org-ql-test-data-buffer "data2.org"))))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))))

(describe "(tags-local)"

Expand All @@ -1470,10 +1470,10 @@ with keyword arg NOW in PLIST."
(org-ql-it "with file tags"
(org-ql-expect ('(tags-local "food"))
nil
:buffer (org-ql-test-data-buffer "data2.org"))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))
(org-ql-expect ('(tags-local "fruit"))
'("Fruit")
:buffer (org-ql-test-data-buffer "data2.org"))))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))))

(describe "(tags-all), (tags&)"

Expand All @@ -1486,7 +1486,7 @@ with keyword arg NOW in PLIST."
(org-ql-it "with file tags"
(org-ql-expect ('(tags-all "food" "fruit"))
'("Fruit" "Blueberry" "Strawberry")
:buffer (org-ql-test-data-buffer "data2.org"))))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))))

(describe "(tags-regexp), (tags*)"

Expand All @@ -1511,10 +1511,10 @@ with keyword arg NOW in PLIST."
(org-ql-it "with regexp matching file tags"
(org-ql-expect ('(tags-regexp "foo"))
'("Fruit" "Blueberry" "Strawberry" "Vegetable" "Broccoli" "Potato")
:buffer (org-ql-test-data-buffer "data2.org"))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))
(org-ql-expect ('(tags* "frui"))
'("Fruit" "Blueberry" "Strawberry")
:buffer (org-ql-test-data-buffer "data2.org"))))
:buffer (org-ql-test-data-buffer "data-file-tags.org"))))

(describe "(ts)"

Expand Down

0 comments on commit 6c9c0b9

Please sign in to comment.