Remove unused Home route

This commit is contained in:
Correl Roush 2023-01-09 15:04:51 -05:00
parent f873ba7967
commit f0475c2217

View file

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