X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fon-line%2Fxslt%2Fls2html.xsl;h=f0376baa5aa5a313157b0bfd8a906a6078fce3a0;hb=1c7fb836e2af4f2f3d18afd0396701f2094265ff;hp=a99a98f23f7c3de1192334a59a6a541608379b9d;hpb=fb890743cf20c64d747647c1082f06edf22f806f;p=helm.git

diff --git a/helm/on-line/xslt/ls2html.xsl b/helm/on-line/xslt/ls2html.xsl
index a99a98f23..f0376baa5 100644
--- a/helm/on-line/xslt/ls2html.xsl
+++ b/helm/on-line/xslt/ls2html.xsl
@@ -113,6 +113,7 @@
  <xsl:variable name="name" select="@name"/>
  <xsl:variable name="ann" select="ann/@value"/>
  <xsl:variable name="types" select="types/@value"/>
+ <xsl:variable name="body" select="body/@value"/>
  <xsl:variable name="icon">
   <xsl:choose>
    <xsl:when test="$ann = 'YES'">text.gif</xsl:when>
@@ -134,10 +135,22 @@
      <xsl:with-param name="s" select="$name"/>
     </xsl:call-template>
    </xsl:variable>
+   <xsl:variable name="quotedbodyname">
+    <xsl:call-template name="jsquote">
+     <xsl:with-param name="s" select="concat($name,'.body')"/>
+    </xsl:call-template>
+   </xsl:variable>
    <a href="" target="{$target}"
       onClick="this.href=makeURL('{$target}','{concat($quoteduri,$quotedname)}','{$ann}','{$types}')"
       onMouseOver="window.status='{concat($quoteduri,$quotedname)}'; return true"
    ><xsl:value-of select="$name"/></a>
+   <xsl:if test="not($body='NO')">
+    <xsl:text> </xsl:text>
+    <a href="" target="{$target}"
+       onClick="this.href=makeURL('{$target}','{concat($quoteduri,$quotedbodyname)}','{$ann}','{$types}')"
+       onMouseOver="window.status='{concat($quoteduri,$quotedname)}'; return true"
+    >Body</a>
+   </xsl:if>
   </td>
  </tr>
 </xsl:template>