THIS PROJECT IS NO LONGER MAINTAINED
August 27, 2017 ยท View on GitHub
XMLHttpRequest binding for purescript.
USAGE
GET request
please read Module documentation if you want to know about other hooks.
getQuery = get defaultAjaxOptions
{ onReadyStateChange = onSuccess $ \response -> do
txt <- getResponseText response
Debug.Trace.trace txt
} "/api/foo" {queryParam: "bar"}
POST request with application/x-www-form-urlencoded
postQuery1 = post defaultAjaxOptions
{ onReadyStateChange = onSuccess $ \response -> do
txt <- getResponseText response
Debug.Trace.trace txt
} "/api/bar" {} (urlEncoded {param: "bar"})
POST request with multipart/form-data
postQuery2 = post defaultAjaxOptions
{ onReadyStateChange = onSuccess $ \response -> do
txt <- getResponseText response
Debug.Trace.trace txt
} "/api/bar" {} (multipart {param: "bar"})
Abort request
abortQuery = do
task <- get defaultAjaxOptions "/api/foo" {}
abort task
Sync request
syncQuery = do
task <- get defaultAjaxOptions { async = false } "/api/baz" {}
txt <- getResponseText (unsafeToResponsege task)
Debug.Trace.trace txt
Other request
delete = ajax defaultAjaxOptions
{ method = "DELETE"
, url = "/api/qux"
} {} noBody