mirror of
https://github.com/dillonkearns/elm-pages-v3-beta.git
synced 2024-12-28 06:12:33 +03:00
Fix case for index route codegen.
This commit is contained in:
parent
b4aceaeb64
commit
c93e3d8f85
@ -145,7 +145,7 @@ routeToBranch route =
|
||||
)
|
||||
in
|
||||
case route.segments of
|
||||
[] ->
|
||||
[ StaticSegment "Index" ] ->
|
||||
[ ( Elm.CodeGen.listPattern [], Elm.CodeGen.val "Index" ) ]
|
||||
|
||||
segments ->
|
||||
|
@ -138,7 +138,7 @@ suite =
|
||||
, describe "toCase"
|
||||
[ test "root route" <|
|
||||
\() ->
|
||||
[]
|
||||
[ "Index" ]
|
||||
|> testCaseGenerator
|
||||
[ ( Elm.CodeGen.listPattern []
|
||||
, Elm.CodeGen.val "Index"
|
||||
|
Loading…
Reference in New Issue
Block a user