From f30094dc3d98ab6902bdf079b26b269f387af892 Mon Sep 17 00:00:00 2001
From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Tue, 16 Oct 2001 16:53:07 +0000
Subject: [PATCH] Bug related to #xpointer(1/n/m) constructor URI fixed.

---
 helm/style/mk_meta_graph.xsl | 26 ++++++++++++++++++++++++--
 1 file changed, 24 insertions(+), 2 deletions(-)

diff --git a/helm/style/mk_meta_graph.xsl b/helm/style/mk_meta_graph.xsl
index 44d5a9070..243aedc44 100644
--- a/helm/style/mk_meta_graph.xsl
+++ b/helm/style/mk_meta_graph.xsl
@@ -40,7 +40,7 @@
 <xsl:param name="getterURL" select="''"/>
 <xsl:param name="uri_set_queueURL" select="''"/>
 <xsl:param name="uri_set_size" select="30"/>
-<xsl:variable name="RDF_base_URL_of_CIC_URI" select="concat($getterURL,'getxml?uri=helm:rdf:www.cs.unibo.it/helm/rdf/rdfprova//')"/>
+<xsl:variable name="base_URL_of_URI" select="concat($getterURL,'getxml?uri=')"/>
 
 <!-- CSC: next functions because I don't remember the name of the    -->
 <!-- CSC: subst function of xslt and I don't have the specs with me -->
@@ -139,6 +139,23 @@
  </xsl:choose>
 </xsl:template>
 
+<xsl:template name="RDFURI_of_CICURI">
+ <xsl:param name="uri" select="''"/>
+ <xsl:variable name="base_RDF_URI" select="'helm:rdf:www.cs.unibo.it/helm/rdf/rdfprova//'"/>
+ <xsl:variable name="before" select="substring-before($uri,'#xpointer(1/')"/>
+ <xsl:value-of select="$base_RDF_URI"/>
+ <xsl:choose>
+  <xsl:when test="$before=''">
+   <xsl:value-of select="$uri"/>
+  </xsl:when>
+  <xsl:otherwise>
+   <xsl:value-of select="concat($before,',')"/>
+   <xsl:variable name="after" select="substring-after($uri,'#xpointer(1/')"/>
+   <xsl:value-of select="translate(substring-before($after,')'),'/',',')"/>
+  </xsl:otherwise>
+ </xsl:choose>
+</xsl:template>
+
 <xsl:template match="/">
  <!--
  <xsl:text>strict digraph L0 { size = "83,83"; concentrate=true; node [style=filled, shape = box];&CSCbr;</xsl:text>
@@ -160,7 +177,12 @@
 <xsl:template mode="loop" match="empty"/>
 
 <xsl:template mode="loop" match="uri|marked_uri">
- <xsl:variable name="document" select="document(concat($RDF_base_URL_of_CIC_URI,@value))"/>
+ <xsl:variable name="rdfuri">
+  <xsl:call-template name="RDFURI_of_CICURI">
+   <xsl:with-param name="uri" select="@value"/>
+  </xsl:call-template>
+ </xsl:variable>
+ <xsl:variable name="document" select="document(concat($base_URL_of_URI,$rdfuri))"/>
  <xsl:choose>
   <xsl:when test="$document/*">
    <xsl:apply-templates mode="first_time" select="$document/*">
-- 
2.39.2