Changeset 4202

Timestamp:

12/18/13 13:14:23 (10 years ago)

Author:

andmor

Message:

Better xquery to return schema metadata.

File:

• cats/SCHEMAcat/trunk/urn.org.isocat.schemacat.access.data/access/schemaMetadata.dpml (modified) (1 diff)

cats/SCHEMAcat/trunk/urn.org.isocat.schemacat.access.data/access/schemaMetadata.dpml

@@ -107 +107 @@
                         <literal type="xml">
                             <query xmlns:sc="http://www.isocat.org/ns/schemacat">
-                                let $schema := //sc:schema[@xml:id=$args//id]
-                                let $fullLicense := //sc:licenses/sc:license[@xml:id eq $schema/sc:license/@ref]
-                                return <sc:schema>{$schema/*[not(name(.) eq 'sc:license')] | $fullLicense}</sc:schema>
+                                copy $schema := /sc:schema[@xml:id=$args//id]
+                                modify (replace node $schema/sc:license with /sc:licenses/sc:license[@xml:id eq $schema/sc:license/@ref])
+                                return $schema
                             </query>
                         </literal>