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
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
Grégoire Locqueville
purescript-gargantext
Commits
c45116fb
Commit
c45116fb
authored
Nov 08, 2019
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[Node] adding team.
parent
dd3c2649
Changes
2
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
18 additions
and
5 deletions
+18
-5
Node.purs
src/Gargantext/Components/Forest/Tree/Node.purs
+13
-2
Types.purs
src/Gargantext/Types.purs
+5
-3
No files found.
src/Gargantext/Components/Forest/Tree/Node.purs
View file @
c45116fb
...
...
@@ -99,10 +99,21 @@ settingsBox FolderPrivate = SettingsBox { show: true
, Delete]
}
settingsBox
FolderShared
= SettingsBox { show: true
settingsBox
Team
= SettingsBox { show: true
, edit : false
, buttons : [Documentation Team
, SearchBox
, Add [ Corpus
, Folder
, Annuaire
]
, Delete]
}
settingsBox FolderShared = SettingsBox { show: true
, edit : true
, buttons : [Documentation FolderShared
-- , Add [Folder, Team
]
, Add [Team, FolderShared
]
, Delete
]
}
...
...
src/Gargantext/Types.purs
View file @
c45116fb
...
...
@@ -162,7 +162,7 @@ instance showNodeType :: Show NodeType where
show Node = "Node"
show Nodes = "Nodes"
show Tree = "NodeTree"
show Team = "Team"
show Team = "
Node
Team"
show NodeList = "NodeList"
show Texts = "NodeTexts"
...
...
@@ -185,7 +185,7 @@ readNodeType "Nodes" = Nodes
readNodeType "NodeCorpus" = Corpus
readNodeType "NodeContact" = NodeContact
readNodeType "Tree" = Tree
readNodeType "
Team"
= Team
readNodeType "
NodeTeam"
= Team
readNodeType "NodeList" = NodeList
readNodeType "NodeTexts" = Texts
readNodeType _ = Error
...
...
@@ -198,8 +198,10 @@ fldr NodeUser true = "fa fa-user-circle-o"
fldr FolderPrivate true = "fa fa-lock"
fldr FolderPrivate false = "fa fa-expeditedssl"
fldr FolderShared true = "fa fa-
users" -- "fa fa-
share-alt"
fldr FolderShared true = "fa fa-share-alt"
fldr FolderShared false = "fa fa-share-alt-square"
fldr Team true = "fa fa-users"
fldr Team false = "fa fa-users"
fldr FolderPublic _ = "fa fa-globe"
...
...
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