[THERMITE] `hide` is now called `hideState`

parent 8631796e
...@@ -13,11 +13,11 @@ import Gargantext.Pages.Corpus.Tabs.Sources as SV ...@@ -13,11 +13,11 @@ import Gargantext.Pages.Corpus.Tabs.Sources as SV
import Gargantext.Pages.Corpus.Tabs.Authors as AV import Gargantext.Pages.Corpus.Tabs.Authors as AV
import Gargantext.Pages.Corpus.Tabs.Terms as TV import Gargantext.Pages.Corpus.Tabs.Terms as TV
import Gargantext.Components.Tab as Tab import Gargantext.Components.Tab as Tab
import Thermite (Spec, focus, hide) import Thermite (Spec, focus, hideState)
pureTab1 :: Spec {} {} Void pureTab1 :: Spec {} {} Void
pureTab1 = hide initialState statefulTab1 pureTab1 = hideState initialState statefulTab1
statefulTab1 :: Spec State {} Action statefulTab1 :: Spec State {} Action
statefulTab1 = statefulTab1 =
......
...@@ -8,7 +8,7 @@ import Data.Lens.Iso.Newtype (_Newtype) ...@@ -8,7 +8,7 @@ import Data.Lens.Iso.Newtype (_Newtype)
import React (ReactElement) import React (ReactElement)
import React.DOM (input, span, td, text, tr) import React.DOM (input, span, td, text, tr)
import React.DOM.Props (_type, checked, className, onChange, style, title) import React.DOM.Props (_type, checked, className, onChange, style, title)
import Thermite (PerformAction, Render, Spec, modifyState, simpleSpec, hide, focusState) import Thermite (PerformAction, Render, Spec, modifyState, simpleSpec, hideState, focusState)
import Gargantext.Utils (getter, setter) import Gargantext.Utils (getter, setter)
newtype State = State newtype State = State
...@@ -38,7 +38,7 @@ data Action ...@@ -38,7 +38,7 @@ data Action
| SetStop Boolean | SetStop Boolean
ngramsItemSpec :: Spec {} {} Void ngramsItemSpec :: Spec {} {} Void
ngramsItemSpec = hide (unwrap initialState) $ ngramsItemSpec = hideState (unwrap initialState) $
focusState (re _Newtype) $ focusState (re _Newtype) $
simpleSpec performAction render simpleSpec performAction render
where where
......
...@@ -17,7 +17,7 @@ import Prelude (class Eq, class Ord, class Show, map, show, void, ($), (*), (+), ...@@ -17,7 +17,7 @@ import Prelude (class Eq, class Ord, class Show, map, show, void, ($), (*), (+),
import React (ReactElement) import React (ReactElement)
import React.DOM hiding (style, map) import React.DOM hiding (style, map)
import React.DOM.Props (_id, _type, className, href, name, onChange, onClick, onInput, placeholder, scope, selected, style, value) import React.DOM.Props (_id, _type, className, href, name, onChange, onClick, onInput, placeholder, scope, selected, style, value)
import Thermite (PerformAction, Spec, _render, focus, foreach, modifyState, focusState, hide) import Thermite (PerformAction, Spec, _render, focus, foreach, modifyState, focusState, hideState)
import Unsafe.Coerce (unsafeCoerce) import Unsafe.Coerce (unsafeCoerce)
newtype State = State newtype State = State
...@@ -159,7 +159,7 @@ tableSpec = over _render \render dispatch p (State s) c -> ...@@ -159,7 +159,7 @@ tableSpec = over _render \render dispatch p (State s) c ->
ngramsTableSpec :: Spec {} {} Void ngramsTableSpec :: Spec {} {} Void
ngramsTableSpec = ngramsTableSpec =
hide (unwrap initialState) $ hideState (unwrap initialState) $
focusState (re _Newtype) $ focusState (re _Newtype) $
container $ container $
tableSpec $ tableSpec $
......
...@@ -16,7 +16,7 @@ import Gargantext.Pages.Home.Actions (Action, performAction) ...@@ -16,7 +16,7 @@ import Gargantext.Pages.Home.Actions (Action, performAction)
import React (ReactElement) import React (ReactElement)
import React.DOM (a, div, h3, i, img, p, span, text) import React.DOM (a, div, h3, i, img, p, span, text)
import React.DOM.Props (Props, _id, aria, className, href, src, target, title) import React.DOM.Props (Props, _id, aria, className, href, src, target, title)
import Thermite (Render, Spec, simpleSpec, hide, focusState) import Thermite (Render, Spec, simpleSpec, hideState, focusState)
-- Layout | -- Layout |
...@@ -26,7 +26,7 @@ landingData FR = Fr.landingData ...@@ -26,7 +26,7 @@ landingData FR = Fr.landingData
landingData EN = En.landingData landingData EN = En.landingData
layoutLanding :: Lang -> Spec {} {} Void layoutLanding :: Lang -> Spec {} {} Void
layoutLanding = hide (unwrap initialState) layoutLanding = hideState (unwrap initialState)
<<< focusState (re _Newtype) <<< focusState (re _Newtype)
<<< layoutLanding' <<< landingData <<< layoutLanding' <<< landingData
......
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