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
6c14392e
Commit
6c14392e
authored
Nov 05, 2020
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Plain Diff
Merge branch 'dev' into dev-merge
parents
6ce3adfd
82cbb0f9
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
8 additions
and
8 deletions
+8
-8
Node.hs
src/Gargantext/Database/Action/Node.hs
+4
-4
Config.hs
src/Gargantext/Database/Admin/Config.hs
+1
-1
Default.hs
src/Gargantext/Database/Admin/Types/Hyperdata/Default.hs
+1
-1
Node.hs
src/Gargantext/Database/Admin/Types/Node.hs
+2
-2
No files found.
src/Gargantext/Database/Action/Node.hs
View file @
6c14392e
...
...
@@ -56,8 +56,8 @@ mkNodeWithParent NodeFrameWrite i u n =
mkNodeWithParent
NodeFrameCalc
i
u
n
=
mkNodeWithParent_ConfigureHyperdata
NodeFrameCalc
i
u
n
mkNodeWithParent
NodeFrame
Code
i
u
n
=
mkNodeWithParent_ConfigureHyperdata
NodeFrame
Code
i
u
n
mkNodeWithParent
NodeFrame
Notebook
i
u
n
=
mkNodeWithParent_ConfigureHyperdata
NodeFrame
Notebook
i
u
n
...
...
@@ -78,8 +78,8 @@ mkNodeWithParent_ConfigureHyperdata NodeFrameWrite (Just i) uId name =
mkNodeWithParent_ConfigureHyperdata
NodeFrameCalc
(
Just
i
)
uId
name
=
mkNodeWithParent_ConfigureHyperdata'
NodeFrameCalc
(
Just
i
)
uId
name
mkNodeWithParent_ConfigureHyperdata
NodeFrame
Code
(
Just
i
)
uId
name
=
insertNode
NodeFrame
Code
(
Just
"Code"
)
(
Just
$
DefaultFrameCode
$
HyperdataFrame
"code
"
name
)
i
uId
mkNodeWithParent_ConfigureHyperdata
NodeFrame
Notebook
(
Just
i
)
uId
name
=
insertNode
NodeFrame
Notebook
(
Just
"Notebook"
)
(
Just
$
DefaultFrameCode
$
HyperdataFrame
"Notebook
"
name
)
i
uId
mkNodeWithParent_ConfigureHyperdata
_
_
_
_
=
nodeError
NotImplYet
...
...
src/Gargantext/Database/Admin/Config.hs
View file @
6c14392e
...
...
@@ -70,7 +70,7 @@ nodeTypeId n =
NodeFrameWrite
->
991
NodeFrameCalc
->
992
NodeFrame
Code
->
993
NodeFrame
Notebook
->
993
-- Cooccurrences -> 9
--
...
...
src/Gargantext/Database/Admin/Types/Hyperdata/Default.hs
View file @
6c14392e
...
...
@@ -115,6 +115,6 @@ defaultHyperdata NodeDashboard = DefaultDashboard defaultHyperdataDashboard
defaultHyperdata
NodeFrameWrite
=
DefaultFrameWrite
defaultHyperdataFrame
defaultHyperdata
NodeFrameCalc
=
DefaultFrameCalc
defaultHyperdataFrame
defaultHyperdata
NodeFrame
Code
=
DefaultFrameCalc
defaultHyperdataFrame
defaultHyperdata
NodeFrame
Notebook
=
DefaultFrameCalc
defaultHyperdataFrame
defaultHyperdata
NodeFile
=
DefaultFile
defaultHyperdataFile
src/Gargantext/Database/Admin/Types/Node.hs
View file @
6c14392e
...
...
@@ -257,7 +257,7 @@ data NodeType = NodeUser
-}
-- Optional Nodes
|
NodeFrameWrite
|
NodeFrameCalc
|
NodeFrame
Code
|
NodeFrameWrite
|
NodeFrameCalc
|
NodeFrame
Notebook
|
NodeFile
deriving
(
Show
,
Read
,
Eq
,
Generic
,
Bounded
,
Enum
)
...
...
@@ -292,7 +292,7 @@ defaultName NodePhylo = "Phylo"
defaultName
NodeFrameWrite
=
"Frame Write"
defaultName
NodeFrameCalc
=
"Frame Calc"
defaultName
NodeFrame
Code
=
"Frame Code"
defaultName
NodeFrame
Notebook
=
"Frame Code"
defaultName
NodeFile
=
"File"
...
...
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