Commit f1e97bd1 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] Typo.

parent a3c09011
...@@ -49,7 +49,7 @@ import Servant ...@@ -49,7 +49,7 @@ import Servant
import Gargantext.API.Ngrams (TabType(..), TableNgramsApi, TableNgramsApiGet, tableNgramsPatch, getTableNgrams) import Gargantext.API.Ngrams (TabType(..), TableNgramsApi, TableNgramsApiGet, tableNgramsPatch, getTableNgrams)
import Gargantext.Prelude import Gargantext.Prelude
import Gargantext.Database.Types.Node 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.Schema.Node ( getNodesWithParentId, getNode, deleteNode, deleteNodes, mk, JSONB, NodeError(..), HasNodeError(..))
import Gargantext.Database.Node.Children (getChildren) import Gargantext.Database.Node.Children (getChildren)
import qualified Gargantext.Database.Node.Update as U (update, Update(..)) import qualified Gargantext.Database.Node.Update as U (update, Update(..))
...@@ -59,6 +59,7 @@ import Gargantext.Database.Metrics.Count (getCoocByDocDev) ...@@ -59,6 +59,7 @@ import Gargantext.Database.Metrics.Count (getCoocByDocDev)
import Gargantext.Database.Schema.Node (defaultList) import Gargantext.Database.Schema.Node (defaultList)
import Gargantext.Database.Schema.NodeNode (nodesToFavorite, nodesToTrash) import Gargantext.Database.Schema.NodeNode (nodesToFavorite, nodesToTrash)
import Gargantext.API.Search ( SearchAPI, searchIn, SearchInQuery) import Gargantext.API.Search ( SearchAPI, searchIn, SearchInQuery)
-- Graph -- Graph
import Gargantext.Text.Flow (cooc2graph) import Gargantext.Text.Flow (cooc2graph)
import Gargantext.Viz.Graph hiding (Node)-- (Graph(_graph_metadata),LegendField(..), GraphMetadata(..),readGraphFromJson,defaultGraph) import Gargantext.Viz.Graph hiding (Node)-- (Graph(_graph_metadata),LegendField(..), GraphMetadata(..),readGraphFromJson,defaultGraph)
...@@ -252,7 +253,7 @@ graphAPI :: NodeId -> GargServer GraphAPI ...@@ -252,7 +253,7 @@ graphAPI :: NodeId -> GargServer GraphAPI
graphAPI cId = undefined graphAPI cId = undefined
--graphAPI' :: NodeId -> GargServer GraphAPI --graphAPI' :: NodeId -> GargServer GraphAPI
--graphAPI' :: NodeId -> Cmd err Graph -- GargServer GraphAPI graphAPI' :: NodeId -> Cmd err Graph -- GargServer GraphAPI
graphAPI' cId = do graphAPI' cId = do
nodeGraph <- getNode cId HyperdataGraph nodeGraph <- getNode cId HyperdataGraph
......
...@@ -40,7 +40,7 @@ import Gargantext.Prelude ...@@ -40,7 +40,7 @@ import Gargantext.Prelude
------------------------------------------------------------------------ ------------------------------------------------------------------------
data PhyloFormat = data PhyloFormat =
PhyloFormat { _phyloFormat_parm :: PhyloParam PhyloFormat { _phyloFormat_param :: PhyloParam
, _phyloFormat_data :: Phylo , _phyloFormat_data :: Phylo
} deriving (Generic) } deriving (Generic)
......
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