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

[DOC] NodeFrameWrite -> Notes

parent 1b118a16
......@@ -114,7 +114,7 @@ settingsBox FolderPrivate =
, buttons : [ Add [ Corpus
, Folder
, Annuaire
, NodeFrameWrite
, Notes
, NodeFrameCalc
-- , NodeFrameNotebook
]
......@@ -125,10 +125,10 @@ settingsBox Team =
SettingsBox { show : true
, edit : true
, doc : Documentation Team
, buttons : [ Add [ Corpus
, buttons : [ Add [ Notes
, Corpus
, Folder
, Annuaire
, NodeFrameWrite
, NodeFrameCalc
-- , NodeFrameNotebook
, Team
......@@ -164,7 +164,7 @@ settingsBox Folder =
, buttons : [ Add [ Corpus
, Folder
, Annuaire
, NodeFrameWrite
, Notes
, NodeFrameCalc
-- , NodeFrameNotebook
]
......@@ -185,7 +185,7 @@ settingsBox Corpus =
, NodeList
, Graph
, Dashboard
, NodeFrameWrite
, Notes
, NodeFrameCalc
, Phylo
-- , NodeFrameNotebook
......@@ -314,11 +314,11 @@ settingsBox Annuaire =
}
settingsBox NodeFrameWrite =
settingsBox Notes =
SettingsBox { show : true
, edit : true
, doc : Documentation NodeFrameWrite
, buttons : [ Add [ NodeFrameWrite
, doc : Documentation Notes
, buttons : [ Add [ Notes
, NodeFrameCalc
, Folder
, Corpus
......@@ -335,7 +335,7 @@ settingsBox NodeFrameCalc =
, doc : Documentation NodeFrameCalc
, buttons : [ Upload
, Add [ NodeFrameCalc
, NodeFrameWrite
, Notes
]
, Move moveFrameParameters
, Delete
......@@ -347,7 +347,7 @@ settingsBox NodeFrameNotebook =
, edit : true
, doc : Documentation NodeFrameNotebook
, buttons : [ Add [ NodeFrameCalc
, NodeFrameWrite
, Notes
-- , NodeFrameNotebook
]
, Move moveFrameParameters
......@@ -361,7 +361,7 @@ settingsBox NodeFrameVisio =
, edit : true
, doc : Documentation NodeFrameVisio
, buttons : [ Add [ NodeFrameVisio
, NodeFrameWrite
, Notes
, NodeFrameCalc
]
, Delete
......@@ -393,14 +393,14 @@ moveParameters = { subTreeParams : SubTreeParams
, Team
, FolderPublic
, Folder
, NodeFrameWrite
, Notes
, Corpus
]
, valitypes: [ FolderPrivate
, Team
-- , FolderPublic
, Folder
, NodeFrameWrite
, Notes
, Corpus
]
}
......@@ -414,7 +414,7 @@ moveFrameParameters = { subTreeParams : SubTreeParams
, FolderPublic
, Folder
, Corpus
, NodeFrameWrite
, Notes
, NodeFrameCalc
]
, valitypes: [ FolderPrivate
......@@ -422,7 +422,7 @@ moveFrameParameters = { subTreeParams : SubTreeParams
-- , FolderPublic
, Folder
, Corpus
, NodeFrameWrite
, Notes
, NodeFrameCalc
]
}
......
......@@ -325,7 +325,7 @@ renderRouteCpt = R.memo' $ here.component "renderRoute" cpt where
GR.PGraphExplorer s g -> graphExplorer (sessionNodeProps s g) []
GR.PhyloExplorer s g -> phyloExplorer (sessionNodeProps s g) []
GR.RouteFile s n -> routeFile (sessionNodeProps s n) []
GR.RouteFrameWrite s n -> routeFrame (Record.merge { nodeType: NodeFrameWrite } $ sessionNodeProps s n) []
GR.RouteFrameWrite s n -> routeFrame (Record.merge { nodeType: Notes } $ sessionNodeProps s n) []
GR.RouteFrameCalc s n -> routeFrame (Record.merge { nodeType: NodeFrameCalc } $ sessionNodeProps s n) []
GR.RouteFrameCode s n -> routeFrame (Record.merge { nodeType: NodeFrameNotebook } $ sessionNodeProps s n) []
GR.RouteFrameVisio s n -> routeFrame (Record.merge { nodeType: NodeFrameVisio } $ sessionNodeProps s n) []
......
......@@ -111,7 +111,7 @@ nodeTypeAppRoute GT.NodeList s i = Just $ Lists s i
nodeTypeAppRoute GT.NodeUser s i = Just $ UserPage s i
nodeTypeAppRoute GT.Team s i = Just $ Team s i
nodeTypeAppRoute GT.NodeTexts s i = Just $ NodeTexts s i
nodeTypeAppRoute GT.NodeFrameWrite s i = Just $ RouteFrameWrite s i
nodeTypeAppRoute GT.Notes s i = Just $ RouteFrameWrite s i
nodeTypeAppRoute GT.NodeFrameCalc s i = Just $ RouteFrameCalc s i
nodeTypeAppRoute GT.NodeFrameVisio s i = Just $ RouteFrameVisio s i
nodeTypeAppRoute _ _ _ = Nothing
......
......@@ -157,7 +157,7 @@ data NodeType = Annuaire
| NodeFile
| NodeFrameCalc
| NodeFrameNotebook
| NodeFrameWrite
| Notes
| NodeFrameVisio
| NodePublic NodeType
derive instance Generic NodeType _
......@@ -197,7 +197,7 @@ instance Show NodeType where
show Team = "NodeTeam"
show NodeList = "NodeList"
show NodeTexts = "NodeTexts"
show NodeFrameWrite = "NodeFrameWrite"
show Notes = "Notes"
show NodeFrameCalc = "NodeFrameCalc"
show NodeFrameNotebook = "NodeFrameNotebook"
show NodeFrameVisio = "NodeFrameVisio"
......@@ -227,7 +227,7 @@ instance Read NodeType where
read "NodeList" = Just NodeList
read "NodeTexts" = Just NodeTexts
read "Annuaire" = Just Annuaire
read "NodeFrameWrite" = Just NodeFrameWrite
read "Notes" = Just Notes
read "NodeFrameCalc" = Just NodeFrameCalc
read "NodeFrameNotebook" = Just NodeFrameNotebook
read "NodeFrameVisio" = Just NodeFrameVisio
......@@ -269,7 +269,7 @@ translateFR = case _ of
NodeFile -> "Fichier"
NodeFrameCalc -> "Feuilles de calcul"
NodeFrameNotebook -> "Carnet de notes"
NodeFrameWrite -> "Éditeur de texte"
Notes -> "Éditeur de texte"
NodeFrameVisio -> "Visio"
NodePublic n -> translateFR n
......@@ -300,7 +300,7 @@ translateEN = case _ of
NodeFile -> "File"
NodeFrameCalc -> "Calc"
NodeFrameNotebook -> "Notebook"
NodeFrameWrite -> "Write"
Notes -> "Notes"
NodeFrameVisio -> "Visio"
NodePublic n -> translateEN n
......@@ -343,8 +343,8 @@ getIcon Annuaire false = "address-card"
getIcon NodeContact true = "address-card-o"
getIcon NodeContact false = "address-card"
getIcon NodeFrameWrite true = "file-text-o"
getIcon NodeFrameWrite false = "file-text"
getIcon Notes true = "file-text-o"
getIcon Notes false = "file-text"
getIcon NodeFrameCalc true = "calculator"
getIcon NodeFrameCalc false = "calculator"
......@@ -409,7 +409,7 @@ nodeTypePath Tree = "tree"
nodeTypePath NodeList = "lists"
nodeTypePath NodeTexts = "texts"
nodeTypePath Team = "team"
nodeTypePath NodeFrameWrite = "write"
nodeTypePath Notes = "write"
nodeTypePath NodeFrameCalc = "calc"
nodeTypePath NodeFrameNotebook = "code"
nodeTypePath NodeFrameVisio = "visio"
......
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