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