diff --git a/package.json b/package.json index d11742a924c8f55532bdda636b655a9d09cd7e96..1392d6a7920be24a9d8f0e41b55cfe88abb57ef9 100644 --- a/package.json +++ b/package.json @@ -1,6 +1,6 @@ { "name": "Gargantext", - "version": "0.0.1.4", + "version": "0.0.1.4.1", "scripts": { "rebase-set": "spago package-set-upgrade && spago psc-package-insdhall", "rebuild-set": "spago psc-package-insdhall", diff --git a/src/Gargantext/Components/Forest/Tree/Node/Box.purs b/src/Gargantext/Components/Forest/Tree/Node/Box.purs index af450d4e34869abfb49dec406e4a75f358d49aa0..44524680ed4e5ec39c4a6a80bfbb694c85782d91 100644 --- a/src/Gargantext/Components/Forest/Tree/Node/Box.purs +++ b/src/Gargantext/Components/Forest/Tree/Node/Box.purs @@ -330,8 +330,9 @@ nodePopupCpt = R.hooksComponent "G.C.F.T.N.B.nodePopupView" cpt [ H.div { className: "popup-container" } [ H.div { className: "panel panel-default" } [ H.div {className: ""} - [ H.div { className : "col-md-11"} + [ H.div { className : "col-md-10 flex-between"} [ H.h3 { className: GT.fldr p.nodeType true} [H.text $ show p.nodeType] + -- , H.div { className : "col-md-1" } [] , H.p {className: "text-primary center"} [H.text p.name] ] ] @@ -511,6 +512,15 @@ panelActionCpt = R.hooksComponent "G.C.F.T.N.B.panelAction" cpt cpt {action: Upload, dispatch, id, nodeType, session} _ = actionUpload nodeType id session dispatch cpt {action: Delete, nodeType, dispatch} _ = actionDelete nodeType dispatch + cpt {action: Add xs, dispatch, id, name, nodePopup: p, nodeType} _ = do + pure $ createNodeView {dispatch, id, name, nodeType, nodeTypes: xs} + + cpt {action: CopyFromCorpus, dispatch, id, nodeType, session} _ = do + pure $ copyFromCorpusView {dispatch, id, nodeType, session} + + cpt {action: Link _} _ = pure $ fragmentPT "Soon, you will be able to link the corpus with your Annuaire (and reciprocally)." + + cpt props@{action: SearchBox, search, session} _ = do pure $ R.fragment [ H.p {"style": {"margin" :"10px"}} [ H.text $ "Search and create a private corpus with the search query as corpus name." ] @@ -526,13 +536,6 @@ panelActionCpt = R.hooksComponent "G.C.F.T.N.B.panelAction" cpt pure unit - cpt {action: Add xs, dispatch, id, name, nodePopup: p, nodeType} _ = do - pure $ createNodeView {dispatch, id, name, nodeType, nodeTypes: xs} - - cpt {action: CopyFromCorpus, dispatch, id, nodeType, session} _ = do - pure $ copyFromCorpusView {dispatch, id, nodeType, session} - - cpt {action: Link _} _ = pure $ fragmentPT "Soon, you will be able to link the corpus with your Annuaire (and reciprocally)." {- cpt {action: Refresh, nodeType: GT.Graph, id, session} _ = do