correlr/tutor
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove unused Home route

Browse source
This commit is contained in:
Correl Roush 2023-01-09 15:04:51 -05:00
parent f873ba7967
commit f0475c2217
1 changed files with 2 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
www/src/Route.elm
View file

@ -6,15 +6,14 @@ import Url.Parser exposing (Parser, map, oneOf, parse, s, top)
type Route type Route
= Home = Collection
| Collection
| DeckList | DeckList
parser : Parser (Route -> a) a parser : Parser (Route -> a) a
parser = parser =
oneOf oneOf
[ map Home top [ map Collection top
, map Collection (s "collection") , map Collection (s "collection")
, map DeckList (s "decks") , map DeckList (s "decks")
] ]
@ -23,8 +22,6 @@ parser =
toUrl : Route -> String toUrl : Route -> String
toUrl route = toUrl route =
case route of case route of
Home ->
Url.Builder.absolute [] []
Collection -> Collection ->
Url.Builder.absolute [ "collection" ] [] Url.Builder.absolute [ "collection" ] []