Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
6 changes: 3 additions & 3 deletions app/Main.hs
Original file line number Diff line number Diff line change
Expand Up @@ -37,7 +37,7 @@ app = (component 0 updateModel viewModel)
{ styles = [ Sheet sheet ]
}
-----------------------------------------------------------------------------
updateModel :: Action -> Effect parent Int Action
updateModel :: Action -> Effect parent props Int Action
updateModel = \case
AddOne ->
this += 1
Expand All @@ -46,8 +46,8 @@ updateModel = \case
SayHelloWorld ->
io_ (consoleLog "Hello World!")
-----------------------------------------------------------------------------
viewModel :: Int -> View Int Action
viewModel x = H.div_
viewModel :: props -> Int -> View Int Action
viewModel _ x = H.div_
[ P.class_ "counter-container" ]
[ H.h1_
[ P.class_ "counter-title"
Expand Down
2 changes: 1 addition & 1 deletion cabal.project
Original file line number Diff line number Diff line change
Expand Up @@ -7,6 +7,6 @@ allow-newer:
source-repository-package
type: git
location: https://github.com/dmjio/miso
tag: 1.10.0
tag: 1.11.0

flags: +template-haskell
Loading