Skip to content

P
purescript-gargantext
Commit 224349d1 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[upload] one more fix for upload URL

parent 02ebf355
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
src/Gargantext/Components/Forest/Tree/Node/Action/Upload.purs
View file @ 224349d1
...@@ -317,7 +317,7 @@ uploadFile :: Session ...@@ -317,7 +317,7 @@ uploadFile :: Session
-> FileType -> FileType
-> {contents :: String, mName :: Maybe String} -> {contents :: String, mName :: Maybe String}
-> Aff GT.AsyncTaskWithType -> 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 let url = GR.NodeAPI NodeList (Just id) $ GT.asyncTaskTypePath GT.ListUpload
-- { input: { data: ..., filetype: "JSON", name: "..." } } -- { input: { data: ..., filetype: "JSON", name: "..." } }
let body = { input: { data: contents let body = { input: { data: contents
......
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