xquery version "3.1";
module namespace tei2 = "http://bibfram.es/tei/";
declare namespace tei = "http://www.tei-c.org/ns/1.0";
declare namespace mml = "http://www.w3.org/1998/Math/MathML";
(: Sends an XHTML doc to OxGarage. Submission fails with 500 if the doc contains non-ASCII characters. :)
declare
%rest:path("/multipart")
%rest:POST("{$d}")
%rest:GET
function tei2:multipart($d as item()*) {
let $data :=
Test multipart-post
let $request :=
{$data}
on
on
false
false
en
true
default
,
$response :=
http:send-request($request)
return (
if ($response[1]/@status eq "200") then {$response[1]} else {$response[1]}
)
};