cerchez07/elm-0.19-workshop
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Flesh out part10

Browse Source
This commit is contained in:
Richard Feldman
2016-09-02 22:21:10 -07:00
parent 5fd5863b53
commit 6ec25f4f57
8 changed files with 221 additions and 86 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
part10/Page.elm
View File

@@ -7,7 +7,7 @@ import String
type Page
= Home
| Repository Int
| Repository String String
| NotFound
@@ -15,7 +15,7 @@ pageParser : Parser (Page -> a) a
pageParser =
UrlParser.oneOf
[ format Home (s "")
, format Repository (s "repositories" </> int)
, format Repository (s "repositories" </> string </> string)
]