Commit 8d7287b7 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] upload file urlEncoded right url (without query params).

parent 40034e50
...@@ -173,8 +173,9 @@ uploadFile session id fileType (UploadFileContents fileContents) = ...@@ -173,8 +173,9 @@ uploadFile session id fileType (UploadFileContents fileContents) =
--postMultipartFormData session p fileContents --postMultipartFormData session p fileContents
where where
q = FileUploadQuery { fileType: fileType } q = FileUploadQuery { fileType: fileType }
p = NodeAPI Corpus (Just id) $ "add/file/async/nobody" <> Q.print (toQuery q) --p = NodeAPI Corpus (Just id) $ "add/file/async/nobody" <> Q.print (toQuery q)
p = NodeAPI Corpus (Just id) $ "add/form/async/nobody" -- <> Q.print (toQuery q)
bodyParams = [ bodyParams = [
Tuple "data" (Just fileContents) Tuple "_wf_data" (Just fileContents)
, Tuple "filetype" (Just $ show fileType) , Tuple "_wf_filetype" (Just $ show fileType)
] ]
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