Skip to content

P
purescript-gargantext
Commit 99444f93 authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

[CODE DESIGN] settings declaration for node in Tree

parent 9b7d6db6
Hide whitespace changes
Inline Side-by-side
Showing with 49 additions and 50 deletions
src/Gargantext/Components/Forest/Tree.purs
View file @ 99444f93
...@@ -206,8 +206,7 @@ performAction (UpdateNode task) { reload: (_ /\ setReload) ...@@ -206,8 +206,7 @@ performAction (UpdateNode task) { reload: (_ /\ setReload)
performAction (RenameNode name) p@{ reload: (_ /\ setReload) performAction (RenameNode name) p@{ reload: (_ /\ setReload)
, session , session
, tree: (NTree (LNode {id}) _) , tree: (NTree (LNode {id}) _)
} } =
=
do do
void $ rename session id $ RenameValue {text:name} void $ rename session id $ RenameValue {text:name}
performAction RefreshTree p performAction RefreshTree p
......
src/Gargantext/Components/Forest/Tree/Node.purs
View file @ 99444f93
...@@ -81,54 +81,54 @@ data SettingsBox = ...@@ -81,54 +81,54 @@ data SettingsBox =
------------------------------------------------------------------------ ------------------------------------------------------------------------
settingsBox :: NodeType -> SettingsBox settingsBox :: NodeType -> SettingsBox
settingsBox NodeUser = SettingsBox { settingsBox NodeUser =
show : true SettingsBox { show : true
, edit : false , edit : false
, doc : Documentation NodeUser , doc : Documentation NodeUser
, buttons : [ Delete ] , buttons : [ Delete ]
} }
settingsBox FolderPrivate = SettingsBox { settingsBox FolderPrivate =
show : true SettingsBox { show : true
, edit : false , edit : false
, doc : Documentation FolderPrivate , doc : Documentation FolderPrivate
, buttons : [ Add [ Corpus , buttons : [ Add [ Corpus
, Folder , Folder
, Annuaire , Annuaire
] ]
] ]
} }
settingsBox Team = SettingsBox { settingsBox Team =
show : true SettingsBox { show : true
, edit : true , edit : true
, doc : Documentation Team , doc : Documentation Team
, buttons : [ Add [ Corpus , buttons : [ Add [ Corpus
, Folder , Folder
, Annuaire , Annuaire
] ]
, Share , Share
, Delete] , Delete]
} }
settingsBox FolderShared = SettingsBox { settingsBox FolderShared =
show : true SettingsBox { show : true
, edit : true , edit : true
, doc : Documentation FolderShared , doc : Documentation FolderShared
, buttons : [ Add [Team, FolderShared] , buttons : [ Add [Team, FolderShared]
-- , Delete -- , Delete
] ]
} }
settingsBox FolderPublic = SettingsBox { settingsBox FolderPublic =
show : true SettingsBox { show : true
, edit : false , edit : false
, doc : Documentation FolderPublic , doc : Documentation FolderPublic
, buttons : [ Add [ Corpus , buttons : [ Add [ Corpus
, Folder , Folder
] ]
] ]
} }
settingsBox Folder = settingsBox Folder =
SettingsBox { show : true SettingsBox { show : true
......
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