dillonkearns/elm-pages-v3-beta
1
1
Fork 0
mirror of https://github.com/dillonkearns/elm-pages-v3-beta.git synced 2024-12-26 05:13:24 +03:00
Code Issues Packages Projects Releases Wiki Activity

Remove some hardcoding.

Browse Source
This commit is contained in:
Dillon Kearns 2022-09-12 17:02:54 -07:00
parent 378a8d7b41
commit b75e285247
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/Pages/Internal/RoutePattern.elm
View File

@ -138,10 +138,10 @@ routeToBranch route =
(\segment -> (\segment ->
case segment of case segment of
StaticSegment name -> StaticSegment name ->
Elm.CodeGen.stringPattern "user" Elm.CodeGen.stringPattern (decapitalize name)
DynamicSegment string -> DynamicSegment name ->
Elm.CodeGen.varPattern "id" Elm.CodeGen.varPattern (decapitalize name)
) )
) )
, Elm.CodeGen.val "TODO" , Elm.CodeGen.val "TODO"