@@ -44,6 +44,8 @@ rulesTest = withTestStore $ \store -> do
4444 Just "example.html" @=? runRoutes routes "example.md"
4545 Just "example.md" @=? runRoutes routes (sv "raw" "example.md")
4646 Just "example.md" @=? runRoutes routes (sv "nav" "example.md")
47+ Just "example.mv1" @=? runRoutes routes (sv "mv1" "example.md")
48+ Just "example.mv2" @=? runRoutes routes (sv "mv2" "example.md")
4749 where
4850 sv g = setVersion (Just g)
4951 expected =
@@ -72,3 +74,12 @@ rules = do
7274 version "nav" $ match (fromList ["example.md"]) $ do
7375 route idRoute
7476 compile copyFileCompiler
77+
78+ -- Another edge case: different versions in one match
79+ match "*.md" $ do
80+ version "mv1" $ do
81+ route $ setExtension "mv1"
82+ compile getResourceString
83+ version "mv2" $ do
84+ route $ setExtension "mv2"
85+ compile getResourceString