Commit c31fd415 authored by Alexandre Delanoë's avatar Alexandre Delanoë

Merge remote-tracking branch 'origin/412-dev-graph-explorer-self-referencing-node' into dev-merge

parents a246c46f 64b1c644
......@@ -384,7 +384,6 @@ onExpandSelectionChange { new } = do
neighborhood :: R2.Leaf ()
neighborhood = R2.leaf neighborhoodCpt
neighborhoodCpt :: R.Memo ()
neighborhoodCpt = R.memo' $ here.component "neighborhood" cpt where
cpt _ _ = do
......@@ -495,8 +494,9 @@ neighborhoodCpt = R.memo' $ here.component "neighborhood" cpt where
R2.when
(
withTruncateResults == false
|| index < maxTruncateResult
(withTruncateResults == false
|| index < maxTruncateResult)
&& (not $ Set.member node.id selectedNodeIds')
) $
H.li
{ className: "graph-neighborhood__badge" }
......
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