Remove unneeded defaultEval
: complete record is already being created
This commit is contained in:
parent
47ca7ca97b
commit
8207250c58
1 changed files with 6 additions and 6 deletions
|
@ -179,12 +179,12 @@ component
|
|||
component mkInput spec = H.mkComponent
|
||||
{ initialState: initialState <<< mkInput
|
||||
, render: spec.render
|
||||
, eval: H.mkEval $ H.defaultEval
|
||||
{ handleQuery = handleQuery spec.handleQuery
|
||||
, handleAction = handleAction spec.handleAction spec.handleMessage
|
||||
, initialize = Just (Initialize spec.initialize)
|
||||
, receive = map Action <<< spec.receive
|
||||
, finalize = map Action spec.finalize
|
||||
, eval: H.mkEval
|
||||
{ handleQuery: handleQuery spec.handleQuery
|
||||
, handleAction: handleAction spec.handleAction spec.handleMessage
|
||||
, initialize: Just (Initialize spec.initialize)
|
||||
, receive: map Action <<< spec.receive
|
||||
, finalize: map Action spec.finalize
|
||||
}
|
||||
}
|
||||
where
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue