diff options
Diffstat (limited to 'tests/Hakyll')
| -rw-r--r-- | tests/Hakyll/Core/Identifier/Tests.hs | 13 | ||||
| -rw-r--r-- | tests/Hakyll/Core/Runtime/Tests.hs | 2 |
2 files changed, 2 insertions, 13 deletions
diff --git a/tests/Hakyll/Core/Identifier/Tests.hs b/tests/Hakyll/Core/Identifier/Tests.hs index 8a8ed7c..2518022 100644 --- a/tests/Hakyll/Core/Identifier/Tests.hs +++ b/tests/Hakyll/Core/Identifier/Tests.hs @@ -6,7 +6,6 @@ module Hakyll.Core.Identifier.Tests -------------------------------------------------------------------------------- -import Data.Monoid (mappend, mempty) import Test.Framework (Test, testGroup) import Test.HUnit ((@=?)) @@ -20,22 +19,12 @@ import TestSuite.Util -------------------------------------------------------------------------------- tests :: Test tests = testGroup "Hakyll.Core.Identifier.Tests" $ concat - [ isLiteralTests - , captureTests + [ captureTests , matchesTests ] -------------------------------------------------------------------------------- -isLiteralTests :: [Test] -isLiteralTests = fromAssertions "isLiteral" - [ Just "index.html" @=? fromLiteral "index.html" - , Nothing @=? fromLiteral "posts/*.markdown" - , Just "test.txt" @=? fromLiteral ("test.txt" `mappend` mempty) - ] - - --------------------------------------------------------------------------------- captureTests :: [Test] captureTests = fromAssertions "capture" [ Just ["bar"] @=? capture "foo/**" "foo/bar" diff --git a/tests/Hakyll/Core/Runtime/Tests.hs b/tests/Hakyll/Core/Runtime/Tests.hs index fa1446f..4b41bf5 100644 --- a/tests/Hakyll/Core/Runtime/Tests.hs +++ b/tests/Hakyll/Core/Runtime/Tests.hs @@ -34,7 +34,7 @@ case01 = withTestConfiguration $ \config -> do >>= saveSnapshot "raw" >>= return . renderPandoc - match "bodies.txt" $ do + create ["bodies.txt"] $ do route idRoute compile $ do items <- loadAllSnapshots "*.md" "raw" |