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
148
Issues
148
List
Board
Labels
Milestones
Merge Requests
2
Merge Requests
2
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
gargantext
purescript-gargantext
Commits
e7177b6b
Commit
e7177b6b
authored
Jul 20, 2020
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[TagCloud] TagCanvas upgrade
parent
34849bd0
Changes
3
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
995 additions
and
268 deletions
+995
-268
TagCanvas.js
src/Gargantext/Components/Viz/TagCloud/TagCanvas.js
+989
-262
Sigmax.purs
src/Gargantext/Hooks/Sigmax.purs
+5
-5
Sigmajs.purs
src/Gargantext/Hooks/Sigmax/Sigmajs.purs
+1
-1
No files found.
src/Gargantext/Components/Viz/TagCloud/TagCanvas.js
View file @
e7177b6b
This diff is collapsed.
Click to expand it.
src/Gargantext/Hooks/Sigmax.purs
View file @
e7177b6b
...
@@ -68,7 +68,7 @@ cleanupSigma sigma context = traverse_ kill (readSigma sigma)
...
@@ -68,7 +68,7 @@ cleanupSigma sigma context = traverse_ kill (readSigma sigma)
emptyOut = writeSigma sigma Nothing *> R.setRef sigma.cleanup Seq.empty
emptyOut = writeSigma sigma Nothing *> R.setRef sigma.cleanup Seq.empty
report = either (log2 errorMsg) (\_ -> log successMsg)
report = either (log2 errorMsg) (\_ -> log successMsg)
prefix = "[" <> context <> "] "
prefix = "[" <> context <> "] "
errorMsg = prefix <> "Error killing sigma:"
errorMsg
= prefix <> "Error killing sigma:"
successMsg = prefix <> "Killed sigma"
successMsg = prefix <> "Killed sigma"
refreshData :: forall n e. Sigma.Sigma -> Sigma.Graph n e -> Effect Unit
refreshData :: forall n e. Sigma.Sigma -> Sigma.Graph n e -> Effect Unit
...
@@ -80,11 +80,11 @@ refreshData sigma graph
...
@@ -80,11 +80,11 @@ refreshData sigma graph
>>= either (log2 errorMsg) refresh
>>= either (log2 errorMsg) refresh
where
where
sigmaGraph = Sigma.graph sigma
sigmaGraph = Sigma.graph sigma
refresh _ = log refreshingMsg *> Sigma.refresh sigma
refresh
_ = log refreshingMsg *> Sigma.refresh sigma
clearingMsg = "[refreshData] Clearing existing graph data"
clearingMsg
= "[refreshData] Clearing existing graph data"
readingMsg = "[refreshData] Reading graph data"
readingMsg
= "[refreshData] Reading graph data"
refreshingMsg = "[refreshData] Refreshing graph"
refreshingMsg = "[refreshData] Refreshing graph"
errorMsg = "[refreshData] Error reading graph data:"
errorMsg
= "[refreshData] Error reading graph data:"
sigmafy :: forall n e. ST.Graph n e -> Sigma.Graph n e
sigmafy :: forall n e. ST.Graph n e -> Sigma.Graph n e
sigmafy (ST.Graph g) = {nodes,edges}
sigmafy (ST.Graph g) = {nodes,edges}
...
...
src/Gargantext/Hooks/Sigmax/Sigmajs.purs
View file @
e7177b6b
...
@@ -86,7 +86,7 @@ type CameraProps =
...
@@ -86,7 +86,7 @@ type CameraProps =
, angle :: Number
, angle :: Number
)
)
foreign import data SigmaInstance' :: # Type
foreign import data SigmaInstance'
:: # Type
foreign import data CameraInstance' :: # Type
foreign import data CameraInstance' :: # Type
type SigmaInstance = { | SigmaInstance' }
type SigmaInstance = { | SigmaInstance' }
type CameraInstance = { | CameraInstance' }
type CameraInstance = { | CameraInstance' }
...
...
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