Commit 4a090915 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] right node to open

parent ba3865e5
...@@ -296,7 +296,7 @@ performAction (SharePublic {params}) p@{ session ...@@ -296,7 +296,7 @@ performAction (SharePublic {params}) p@{ session
Nothing -> performAction NoAction p Nothing -> performAction NoAction p
Just (SubTreeOut {in:inId,out}) -> do Just (SubTreeOut {in:inId,out}) -> do
void $ Share.shareReq session inId $ Share.SharePublicParams {node_id:out} void $ Share.shareReq session inId $ Share.SharePublicParams {node_id:out}
liftEffect $ setOpenNodes (Set.insert (mkNodeId session inId)) liftEffect $ setOpenNodes (Set.insert (mkNodeId session out))
performAction RefreshTree p performAction RefreshTree p
------- -------
......
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