Merge branch 'dev' of ssh://gitlab.iscpif.fr:20022/gargantext/purescript-gargantext into dev

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

@@ -317,7 +317,7 @@ uploadFile :: Session
            -> FileType
            -> {contents :: String, mName :: Maybe String}
            -> Aff GT.AsyncTaskWithType
-uploadFile session NodeList id fileType { mName, contents } = do
+uploadFile session NodeList id JSON { mName, contents } = do
   let url = GR.NodeAPI NodeList (Just id) $ GT.asyncTaskTypePath GT.ListUpload
     -- { input: { data: ..., filetype: "JSON", name: "..." } }
   let body = { input: { data: contents

src/Gargantext/Types.purs

@@ -670,7 +670,7 @@ asyncTaskTypePath :: AsyncTaskType -> String
 asyncTaskTypePath AddNode            = "async/nobody/"
 asyncTaskTypePath Form               = "add/form/async/"
 asyncTaskTypePath GraphRecompute     = "async/recompute/"
-asyncTaskTypePath ListUpload         = "add/form/async/nobody"
+asyncTaskTypePath ListUpload         = "add/form/async"
 asyncTaskTypePath Query              = "query/"
 asyncTaskTypePath UpdateNgramsCharts = "ngrams/async/charts/update/"
 asyncTaskTypePath UpdateNode         = "update/"