Commit 55442dc4 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski

[router] some reorganization of toestand

parent f256e891
...@@ -202,6 +202,10 @@ openedSidePanelCpt = here.component "openedSidePanel" cpt where ...@@ -202,6 +202,10 @@ openedSidePanelCpt = here.component "openedSidePanel" cpt where
route' <- T.useLive T.unequal boxes.route route' <- T.useLive T.unequal boxes.route
session' <- R.useContext session session' <- R.useContext session
{ mGraph, mMetaData, removedNodeIds, selectedNodeIds, sideTab } <- GEST.focusedSidePanel sidePanelGraph
mGraph' <- T.useLive T.unequal mGraph
mGraphMetaData' <- T.useLive T.unequal mMetaData
let className = "side-panel" let className = "side-panel"
case route' of case route' of
...@@ -211,10 +215,6 @@ openedSidePanelCpt = here.component "openedSidePanel" cpt where ...@@ -211,10 +215,6 @@ openedSidePanelCpt = here.component "openedSidePanel" cpt where
, sidePanel: sidePanelLists , sidePanel: sidePanelLists
, sidePanelState } [] ] , sidePanelState } [] ]
GR.PGraphExplorer s g -> do GR.PGraphExplorer s g -> do
{ mGraph, mMetaData, removedNodeIds, selectedNodeIds, sideTab } <- GEST.focusedSidePanel sidePanelGraph
mGraph' <- T.useLive T.unequal mGraph
mGraphMetaData' <- T.useLive T.unequal mMetaData
R.useEffect' $ do R.useEffect' $ do
here.log2 "mGraph" mGraph' here.log2 "mGraph" mGraph'
here.log2 "mGraphMetaData" mGraphMetaData' here.log2 "mGraphMetaData" mGraphMetaData'
......
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