Merge branch 'dev' into dev-scroll-fix

src/Gargantext/Components/App.purs

@@ -62,6 +62,7 @@ appCpt = R.hooksComponent "G.C.App.app" cpt where
           FolderPrivate sid nodeId -> withSession sid $ \session -> forested $ corpusLayout { key: show nodeId, nodeId, session }
           FolderPublic sid nodeId -> withSession sid $ \session -> forested $ corpusLayout { key: show nodeId, nodeId, session }
           FolderShared sid nodeId -> withSession sid $ \session -> forested $ corpusLayout { key: show nodeId, nodeId, session }
+          Team sid nodeId -> withSession sid $ \session -> forested $ corpusLayout { key: show nodeId, nodeId, session }
           Corpus sid nodeId -> withSession sid $ \session -> forested $ corpusLayout { key: show nodeId, nodeId, session }
           Texts sid nodeId  -> withSession sid $ \session -> forested $ textsLayout { nodeId, session, frontends }
           Lists sid nodeId  -> withSession sid $ \session -> forested $ listsLayout { nodeId, session }

src/Gargantext/Components/Forest/Tree/Node.purs

@@ -125,10 +125,10 @@ settingsBox FolderPublic = SettingsBox {
     show: true
   , edit : false
   , doc  : Documentation FolderPublic
-  , buttons : [{-, SearchBox
+  , buttons : [ SearchBox
               , Add [ Corpus
                     , Folder
-                                                          ]-}
+                    ]
     ]
   }
 

src/Gargantext/Components/Forest/Tree/Node/Box.purs

@@ -412,10 +412,12 @@ panelActionCpt = R.hooksComponent "G.C.F.T.N.B.panelAction" cpt
     cpt {action: Upload, dispatch, id, nodeType, session} _ = do
       pure $ uploadFileView {dispatch, id, nodeType, session}
     cpt {action: Download, id, nodeType: NodeList, session} _ = do
-      let href = url session $ Routes.NodeAPI GT.Node (Just id) ""
+      let href = url session $ Routes.NodeAPI GT.NodeList (Just id) ""
       pure $ R.fragment [
-        H.span { className: "row" } [
-           H.a { className: "col-md-12", href, target: "_blank" } [ H.text "Download file" ]
+        H.span { className: "row" }
+               [ H.a { className: "col-md-12"
+                     , href
+                     , target: "_blank" } [ H.text "Download file" ]
                ]
       ]
     cpt {action: Download} _ = do

src/Gargantext/Router.purs

@@ -14,6 +14,7 @@ router = oneOf
   , FolderPrivate    <$> (route "folderPrivate"     *> sid) <*> int
   , FolderPublic     <$> (route "folderPublic"     *> sid) <*> int
   , FolderShared     <$> (route "folderShared"     *> sid) <*> int
+  , Team             <$> (route "team"     *> sid) <*> int
   , CorpusDocument   <$> (route "corpus"     *> sid) <*> int
                         <*> (lit "list" *> int)
                         <*> (lit "document" *> int)

src/Gargantext/Routes.purs

@@ -11,6 +11,7 @@ data AppRoute
   | FolderPrivate SessionId Int
   | FolderPublic SessionId Int
   | FolderShared SessionId Int
+    | Team SessionId Int
   | Corpus SessionId Int
     | Document       SessionId Int Int
     | CorpusDocument SessionId Int Int Int
@@ -46,6 +47,7 @@ instance showAppRoute :: Show AppRoute where
   show (FolderPrivate s i)      = "FolderPrivate"   <> show i <> " (" <> show s <> ")"
   show (FolderPublic s i)       = "FolderPublic"   <> show i <> " (" <> show s <> ")"
   show (FolderShared s i)       = "FolderShared"   <> show i <> " (" <> show s <> ")"
+  show (Team s i)               = "Team"   <> show i <> " (" <> show s <> ")"
   show (Corpus s i)             = "Corpus"   <> show i <> " (" <> show s <> ")"
   show (Document _ s i)         = "Document" <> show i <> " (" <> show s <> ")"
   show (CorpusDocument s _ _ i) = "CorpusDocument" <> show i <> " (" <> show s <> ")"
@@ -64,6 +66,7 @@ appPath (Folder s i)         = "folder/"     <> show s <> "/" <> show i
 appPath (FolderPrivate s i)  = "folderPrivate/" <> show s <> "/" <> show i
 appPath (FolderPublic s i)   = "folderPublic/"  <> show s <> "/" <> show i
 appPath (FolderShared s i)   = "folderShared/"  <> show s <> "/" <> show i
+appPath (Team s i)           = "team/"          <> show s <> "/" <> show i
 appPath (CorpusDocument s c l i) = "corpus/" <> show s <> "/" <> show c <> "/list/" <> show l <> "/document/" <> show i
 appPath (Corpus s i)         = "corpus/"     <> show s <> "/" <> show i
 appPath (Document s l i)     = "list/"       <> show s <> "/" <> show l <> "/document/" <> show i