X-Git-Url: http://git.indexdata.com/?p=mp-xquery-moved-to-github.git;a=blobdiff_plain;f=bibframe%2Fmarcxml_raw.patch;fp=bibframe%2Fmarcxml_raw.patch;h=57fd0b0e94bd72426d3f6281fb3b0183a8f0752c;hp=0000000000000000000000000000000000000000;hb=a5a1156764f6ac90995398cc97c2cb42d8324f99;hpb=97a5d917e83757b1d2c4a631f8ff1262acd192de

diff --git a/bibframe/marcxml_raw.patch b/bibframe/marcxml_raw.patch
new file mode 100644
index 0000000..57fd0b0
--- /dev/null
+++ b/bibframe/marcxml_raw.patch
@@ -0,0 +1,17 @@
+diff --git a/xbin/zorba3-0.xqy b/xbin/zorba3-0.xqy
+index ba07c2e..481950f 100644
+--- a/xbin/zorba3-0.xqy
++++ b/xbin/zorba3-0.xqy
+@@ -212,7 +212,11 @@ let $marcxml :=
+         let $json := http:get($marcxmluri)
+         return parsexml:parse($json("body")("content"), <parseoptions:options/>)
+     else
+-        let $raw-data as xs:string := file:read-text($marcxmluri)
++        let $raw-data :=
++            if ( fn:starts-with($marcxmluri, "raw:" ) ) then
++                fn:substring($marcxmluri, 5)
++            else
++                file:read-text($marcxmluri)
+         let $mxml := parsexml:parse(
+                     $raw-data, 
+                     <parseoptions:options />