summaryrefslogtreecommitdiff
path: root/tests/Hakyll
diff options
context:
space:
mode:
Diffstat (limited to 'tests/Hakyll')
-rw-r--r--tests/Hakyll/Core/Identifier/Tests.hs8
1 files changed, 5 insertions, 3 deletions
diff --git a/tests/Hakyll/Core/Identifier/Tests.hs b/tests/Hakyll/Core/Identifier/Tests.hs
index 4060b1f..c496a98 100644
--- a/tests/Hakyll/Core/Identifier/Tests.hs
+++ b/tests/Hakyll/Core/Identifier/Tests.hs
@@ -37,8 +37,10 @@ captureTests = fromAssertions "capture"
matchesTests :: [Test]
matchesTests = fromAssertions "matches"
- [ True @=? matches (regex "^foo/[^x]*$") "foo/bar"
- , False @=? matches (regex "^foo/[^x]*$") "foo/barx"
- , True @=? matches (list ["foo.markdown"]) "foo.markdown"
+ [ True @=? matches (list ["foo.markdown"]) "foo.markdown"
, False @=? matches (list ["foo"]) (Identifier (Just "foo") "foo")
+ , True @=? matches (regex "^foo/[^x]*$") "foo/bar"
+ , False @=? matches (regex "^foo/[^x]*$") "foo/barx"
+ , True @=? matches (complement "foo.markdown") "bar.markdown"
+ , False @=? matches (complement "foo.markdown") "foo.markdown"
]