Commit 5a5f5594 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[REFACT|FEAT] adding subtree to link action of corpus (WIP)

parent 24d2b4d5
...@@ -244,9 +244,8 @@ panelActionCpt = R.hooksComponent "G.C.F.T.N.B.panelAction" cpt ...@@ -244,9 +244,8 @@ panelActionCpt = R.hooksComponent "G.C.F.T.N.B.panelAction" cpt
cpt {action: Move {subTreeParams}, dispatch, id, nodeType, session} _ = do cpt {action: Move {subTreeParams}, dispatch, id, nodeType, session} _ = do
pure $ copyFromCorpusView {dispatch, id, nodeType, session, subTreeParams} pure $ copyFromCorpusView {dispatch, id, nodeType, session, subTreeParams}
cpt {action: Link _} _ = pure $ fragmentPT $ "Soon, you will be able " cpt {action: Link {subTreeParams}, dispatch, id, nodeType, session} _ = do
<> "to link the corpus with your Annuaire" pure $ copyFromCorpusView {dispatch, id, nodeType, session, subTreeParams}
<> " (and reciprocally)."
cpt {action : Share, dispatch, id, name } _ = do cpt {action : Share, dispatch, id, name } _ = do
isOpen <- R.useState' true isOpen <- R.useState' true
......
...@@ -25,8 +25,8 @@ data NodeAction = Documentation NodeType ...@@ -25,8 +25,8 @@ data NodeAction = Documentation NodeType
| Add (Array NodeType) | Add (Array NodeType)
| Merge { subTreeParams :: SubTreeParams } | Merge { subTreeParams :: SubTreeParams }
| Move { subTreeParams :: SubTreeParams } | Move { subTreeParams :: SubTreeParams }
| Link { subTreeParams :: SubTreeParams }
| Clone | Clone
| Link NodeType
------------------------------------------------------------------------ ------------------------------------------------------------------------
-- TODO move elsewhere -- TODO move elsewhere
...@@ -174,7 +174,18 @@ settingsBox Corpus = ...@@ -174,7 +174,18 @@ settingsBox Corpus =
, Download , Download
, Move moveParameters , Move moveParameters
--, Clone --, Clone
, Link Annuaire , Link { subTreeParams : SubTreeParams
{ showtypes: [ FolderPrivate
, FolderShared
, Team
, FolderPublic
, Folder
, Annuaire
]
, valitypes: [ Annuaire
]
}
}
, Delete , Delete
] ]
} }
......
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