Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
P
purescript-gargantext
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
1
Merge Requests
1
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Przemyslaw Kaminski
purescript-gargantext
Commits
ddedc982
Commit
ddedc982
authored
5 years ago
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[GRAPH][OPTIM] edgeHovering cause perf issue.
parent
943d280e
dev-searx-parser
21-dev-automated-tests
294-dev-test
300-dev-purescript-simple-json
301-dev-visio-integration
304-dev-force-atlas-flickering-fix
305-dev-sidebar-fixes
339-dev-docs-download
80-dev-frontend-errors
dev-frame-calc-corpus-csv-upload
1 merge request
!1
Dev test
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
5 additions
and
3 deletions
+5
-3
Graph.purs
src/Gargantext/Components/Graph.purs
+1
-1
Types.purs
src/Gargantext/Components/GraphExplorer/Types.purs
+4
-2
No files found.
src/Gargantext/Components/Graph.purs
View file @
ddedc982
...
...
@@ -215,7 +215,7 @@ sigmaSettings =
, drawEdges: true
, drawLabels: true
, drawNodes: true
, enableEdgeHovering:
tru
e
, enableEdgeHovering:
fals
e
, edgeHoverExtremities: true
, edgeHoverColor: "edge"
, edgeHoverSizeRatio: 2.0
...
...
This diff is collapsed.
Click to expand it.
src/Gargantext/Components/GraphExplorer/Types.purs
View file @
ddedc982
...
...
@@ -62,6 +62,7 @@ newtype MetaData = MetaData
, legend :: Array Legend
, corpusId :: Array Int
, listId :: ListId
, version :: Int
}
getLegend :: GraphData -> Maybe (Array Legend)
...
...
@@ -97,7 +98,7 @@ initialGraphData = GraphData {
nodes: []
, edges: []
, sides: []
, metaData : Just $ MetaData {title : "", legend : [], corpusId : [], listId : 0}
, metaData : Just $ MetaData {title : "", legend : [], corpusId : [], listId : 0
, version : 0
}
}
instance decodeJsonGraphData :: DecodeJson GraphData where
...
...
@@ -134,7 +135,8 @@ instance decodeJsonMetaData :: DecodeJson MetaData where
legend <- obj .: "legend"
corpusId <- obj .: "corpusId"
listId <- obj .: "listId"
pure $ MetaData { title, legend, corpusId, listId}
version <- obj .: "version"
pure $ MetaData { title, legend, corpusId, listId, version}
instance decodeJsonLegend :: DecodeJson Legend where
...
...
This diff is collapsed.
Click to expand it.
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment