[graph] forceatlas with hidden edges is working now

src/Gargantext/Components/GraphExplorer/Controls.purs

@@ -111,8 +111,9 @@ controlsCpt = here.component "controls" cpt
       R.useEffect' $ Sigmax.handleForceAtlas2Pause sigmaRef forceAtlasState mFAPauseRef Graph.forceAtlas2Settings
 
       -- Handle automatic edge hiding when FA is running (to prevent flickering).
-      R.useEffect2' sigmaRef forceAtlasState' $ do
-        T.modify_ (SigmaxT.forceAtlasEdgeState forceAtlasState') showEdges
+      -- TODO Commented temporarily: this breaks forceatlas rendering after reset
+      -- R.useEffect2' sigmaRef forceAtlasState' $ do
+      --   T.modify_ (SigmaxT.forceAtlasEdgeState forceAtlasState') showEdges
 
       -- Automatic opening of sidebar when a node is selected (but only first time).
       R.useEffect' $ do

src/Gargantext/Components/GraphExplorer/ToggleButton.purs

@@ -15,16 +15,15 @@ module Gargantext.Components.GraphExplorer.ToggleButton
 import Prelude
 
 import Effect (Effect)
-import Reactix as R
-import Reactix.DOM.HTML as H
-import Toestand as T
-
 import Gargantext.Components.Graph as Graph
 import Gargantext.Hooks.Sigmax as Sigmax
 import Gargantext.Hooks.Sigmax.Sigma as Sigma
 import Gargantext.Hooks.Sigmax.Types as SigmaxTypes
 import Gargantext.Types as GT
 import Gargantext.Utils.Reactix as R2
+import Reactix as R
+import Reactix.DOM.HTML as H
+import Toestand as T
 
 here :: R2.Here
 here = R2.here "Gargantext.Components.GraphExplorer.ToggleButton"
@@ -184,6 +183,7 @@ resetForceAtlasButtonCpt = here.component "resetForceAtlasToggleButton" cpt
       -- startForceAtlas2 sigma
       Sigmax.dependOnSigma (R.readRef sigmaRef) "[resetForceAtlasButton] no sigma" $ \sigma -> do
         Sigma.killForceAtlas2 sigma
+        Sigma.refreshForceAtlas sigma Graph.forceAtlas2Settings
         T.write_ SigmaxTypes.Killed forceAtlasState
 
 type TreeToggleButtonProps = (

src/Gargantext/Hooks/Sigmax/Types.purs

@@ -168,7 +168,7 @@ toggleForceAtlasState InitialRunning = Paused
 toggleForceAtlasState InitialStopped = InitialRunning
 toggleForceAtlasState Running = Paused
 toggleForceAtlasState Paused = Running
-toggleForceAtlasState Killed = Running
+toggleForceAtlasState Killed = InitialRunning
 
 -- | Custom state for show edges. Normally it is EShow or EHide (show/hide
 -- | edges). However, edges are temporarily turned off when forceAtlas is
@@ -219,6 +219,7 @@ forceAtlasEdgeState Running EShow = ETempHiddenThenShow
 forceAtlasEdgeState Running es = es
 forceAtlasEdgeState Paused ETempHiddenThenShow = EShow
 forceAtlasEdgeState Paused es = es
+forceAtlasEdgeState Killed ETempHiddenThenShow = EShow
 forceAtlasEdgeState Killed es = es