Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
H
haskell-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
0
Merge Requests
0
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
haskell-gargantext
Commits
f1e97bd1
Commit
f1e97bd1
authored
Jan 21, 2019
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[FIX] Typo.
parent
a3c09011
Changes
2
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
4 additions
and
3 deletions
+4
-3
Node.hs
src/Gargantext/API/Node.hs
+3
-2
Phylo.hs
src/Gargantext/Viz/Phylo.hs
+1
-1
No files found.
src/Gargantext/API/Node.hs
View file @
f1e97bd1
...
...
@@ -49,7 +49,7 @@ import Servant
import
Gargantext.API.Ngrams
(
TabType
(
..
),
TableNgramsApi
,
TableNgramsApiGet
,
tableNgramsPatch
,
getTableNgrams
)
import
Gargantext.Prelude
import
Gargantext.Database.Types.Node
import
Gargantext.Database.Utils
(
Cmd
,
CmdM
)
import
Gargantext.Database.Utils
--
(Cmd, CmdM)
import
Gargantext.Database.Schema.Node
(
getNodesWithParentId
,
getNode
,
deleteNode
,
deleteNodes
,
mk
,
JSONB
,
NodeError
(
..
),
HasNodeError
(
..
))
import
Gargantext.Database.Node.Children
(
getChildren
)
import
qualified
Gargantext.Database.Node.Update
as
U
(
update
,
Update
(
..
))
...
...
@@ -59,6 +59,7 @@ import Gargantext.Database.Metrics.Count (getCoocByDocDev)
import
Gargantext.Database.Schema.Node
(
defaultList
)
import
Gargantext.Database.Schema.NodeNode
(
nodesToFavorite
,
nodesToTrash
)
import
Gargantext.API.Search
(
SearchAPI
,
searchIn
,
SearchInQuery
)
-- Graph
import
Gargantext.Text.Flow
(
cooc2graph
)
import
Gargantext.Viz.Graph
hiding
(
Node
)
-- (Graph(_graph_metadata),LegendField(..), GraphMetadata(..),readGraphFromJson,defaultGraph)
...
...
@@ -252,7 +253,7 @@ graphAPI :: NodeId -> GargServer GraphAPI
graphAPI
cId
=
undefined
--graphAPI' :: NodeId -> GargServer GraphAPI
--
graphAPI' :: NodeId -> Cmd err Graph -- GargServer GraphAPI
graphAPI'
::
NodeId
->
Cmd
err
Graph
-- GargServer GraphAPI
graphAPI'
cId
=
do
nodeGraph
<-
getNode
cId
HyperdataGraph
...
...
src/Gargantext/Viz/Phylo.hs
View file @
f1e97bd1
...
...
@@ -40,7 +40,7 @@ import Gargantext.Prelude
------------------------------------------------------------------------
data
PhyloFormat
=
PhyloFormat
{
_phyloFormat_parm
::
PhyloParam
PhyloFormat
{
_phyloFormat_par
a
m
::
PhyloParam
,
_phyloFormat_data
::
Phylo
}
deriving
(
Generic
)
...
...
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