Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
SADE
SADE
Commits
7b26d830
Commit
7b26d830
authored
Jan 15, 2020
by
Mathias Goebel
🎠
Browse files
fixes syntax from olde http client not migratet very well
parent
65977b25
Changes
1
Hide whitespace changes
Inline
Side-by-side
modules/textgrid/client.xqm
View file @
7b26d830
...
...
@@ -71,15 +71,11 @@ declare function tgclient:getData($id as xs:string, $tgcrud-url as xs:string, $s
<http:request method="get">
<http:header name="Connection" value="close" />
</http:request>
let $getBody := http:send-request($reqGet, $reqUrl)[2]
let $request := http:send-request($reqGet, $reqUrl)
let $getBody := $request[2]
return
switch ($getBody/@mimetype)
case "text/plain" return
if ($getBody/@encoding = "URLEncoded") then
process:execute(('/usr/bin/curl',$reqUrl, "-s"), ())//line => string-join(" ")
else string($getBody)
default return document { $getBody/node() }
document { $getBody }
};
(:~ Returns a list of TextGrid items within a given aggregation, but only the
...
...
@@ -224,7 +220,7 @@ map:merge(
map:entry($key, $value))
};
declare function local:soapHeader($requestName as xs:string) as node()
declare function local:soapHeader($requestName as xs:string) as node()
{
<http:header
name = "SOAP-Action"
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment