Commit ef3c3ff4 authored by David Himmelstrup's avatar David Himmelstrup
Browse files

Use correct uri to /buildreports

parent 7c5db950
...@@ -51,7 +51,7 @@ postBuildReport :: URI -> BuildReport -> BrowserAction BuildReportId ...@@ -51,7 +51,7 @@ postBuildReport :: URI -> BuildReport -> BrowserAction BuildReportId
postBuildReport uri buildReport = do postBuildReport uri buildReport = do
setAllowRedirects False setAllowRedirects False
(_, response) <- request Request { (_, response) <- request Request {
rqURI = uri, rqURI = uri { uriPath = "/buildreports" },
rqMethod = POST, rqMethod = POST,
rqHeaders = [Header HdrContentType ("text/plain"), rqHeaders = [Header HdrContentType ("text/plain"),
Header HdrContentLength (show (length body)), Header HdrContentLength (show (length body)),
......
Supports Markdown
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