add new collection page

This commit is contained in:
Alexander Foremny
2024-06-06 23:05:41 +02:00
parent 3add980b73
commit 378e007141
5 changed files with 64 additions and 1 deletions

View File

@@ -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_
[]