Skip to content

P
purescript-gargantext
Commit 64b1c644 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[sidebar] don't show selected node ids in neighbours

parent f94c4685
Hide whitespace changes
Inline Side-by-side
Showing with 3 additions and 3 deletions
src/Gargantext/Components/GraphExplorer/Sidebar.purs
View file @ 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