summaryrefslogtreecommitdiff
path: root/tests/Hakyll/Core/Rules
diff options
context:
space:
mode:
Diffstat (limited to 'tests/Hakyll/Core/Rules')
-rw-r--r--tests/Hakyll/Core/Rules/Tests.hs8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/Hakyll/Core/Rules/Tests.hs b/tests/Hakyll/Core/Rules/Tests.hs
index 4f0b40e..a8a9dc1 100644
--- a/tests/Hakyll/Core/Rules/Tests.hs
+++ b/tests/Hakyll/Core/Rules/Tests.hs
@@ -15,9 +15,11 @@ import Test.HUnit (Assertion, assert, (@=?))
--------------------------------------------------------------------------------
import Hakyll.Core.Compiler
import Hakyll.Core.Identifier
+import Hakyll.Core.Identifier.Pattern
import Hakyll.Core.Routes
import Hakyll.Core.Rules
import Hakyll.Core.Rules.Internal
+import Hakyll.Core.Writable.CopyFile
import Hakyll.Web.Page
import TestSuite.Util
@@ -48,6 +50,7 @@ rulesTest = withTestStore $ \store -> do
, "russian.md"
, raw "example.md"
, raw "russian.md"
+ , setVersion (Just "nav") "example.md"
]
@@ -63,3 +66,8 @@ rules = do
match "*.md" $ version "raw" $ do
route idRoute
compile getResourceString
+
+ -- Regression test
+ version "nav" $ match (fromList ["example.md"]) $ do
+ route idRoute
+ compile copyFileCompiler