Commit c916a1cc authored by Grégoire Locqueville's avatar Grégoire Locqueville

Remove useless calls to unsafeSet

parent bcdff0bb
Pipeline #7328 passed with stages
in 20 minutes and 1 second
......@@ -7,7 +7,6 @@ import Gargantext.Hooks.StateRecord (useStateRecord)
import Gargantext.Components.Bootstrap as B
import Gargantext.Components.Bootstrap.Types (ButtonVariant(..), ComponentStatus(..), Variant(..))
import Gargantext.Utils.Reactix as R2
import Record.Unsafe (unsafeSet)
import Reactix as R
import Reactix.DOM.HTML as H
import Toestand as T
......@@ -30,7 +29,7 @@ component = R.hooksComponent "subcorpusCreation" cpt
let
onParentListCheckboxChange :: Boolean -> Effect Unit
onParentListCheckboxChange value = T.modify_
(\prev -> unsafeSet "reuseParentList" value prev)
(\prev -> prev { reuseParentList = value })
stateBox
pure $ H.div {}
......
......@@ -30,7 +30,6 @@ import Gargantext.Utils.Reactix as R2
import Reactix as R
import Reactix.DOM.HTML as H
import Record as Record
import Record.Unsafe (unsafeSet)
import Toestand as T
here :: R2.Here
......@@ -119,13 +118,13 @@ componentCpt = here.component "main" cpt
-- @XXX StateRecord with distinct value types
onAgreedCheckboxChange :: Boolean -> Effect Unit
onAgreedCheckboxChange value = T.modify_
(\prev -> unsafeSet "agreed" value prev)
(\prev -> prev { agreed = value })
stateBox
-- @XXX StateRecord with distinct value types
onAgreedLabelClick :: Unit -> Effect Unit
onAgreedLabelClick _ = T.modify_
(\prev -> unsafeSet "agreed" (not state.agreed) prev)
(\prev -> prev { agreed = not state.agreed })
stateBox
-- | Render
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment