mirror of
https://github.com/dillonkearns/elm-pages-v3-beta.git
synced 2024-12-25 12:52:27 +03:00
Remove some hardcoding.
This commit is contained in:
parent
378a8d7b41
commit
b75e285247
@ -138,10 +138,10 @@ routeToBranch route =
|
||||
(\segment ->
|
||||
case segment of
|
||||
StaticSegment name ->
|
||||
Elm.CodeGen.stringPattern "user"
|
||||
Elm.CodeGen.stringPattern (decapitalize name)
|
||||
|
||||
DynamicSegment string ->
|
||||
Elm.CodeGen.varPattern "id"
|
||||
DynamicSegment name ->
|
||||
Elm.CodeGen.varPattern (decapitalize name)
|
||||
)
|
||||
)
|
||||
, Elm.CodeGen.val "TODO"
|
||||
|
Loading…
Reference in New Issue
Block a user