add new collection page
This commit is contained in:
@@ -214,7 +214,12 @@ viewBranch s =
|
||||
viewCollections :: LoadedState -> View Action
|
||||
viewCollections s =
|
||||
section_ [] $
|
||||
[ span_ [] [text "collections"],
|
||||
[ span_
|
||||
[]
|
||||
[ text "collections",
|
||||
text " ",
|
||||
a_ [href_ "#collection/new"] [text "+new"]
|
||||
],
|
||||
ol_ [] $
|
||||
[ li_
|
||||
[]
|
||||
|
||||
Reference in New Issue
Block a user