Updates to Order Screen

This commit is contained in:
2022-05-12 20:03:39 +10:00
parent a587423d3e
commit 100a772297
7 changed files with 44 additions and 13 deletions

View File

@@ -8,4 +8,11 @@ let htmlViewWithContext func =
func (snd ctx)
|> htmlView
)
|> warbler
let htmlViewWithContextAndId (id: int) func =
(fun ctx ->
func (snd ctx) id
|> htmlView
)
|> warbler