ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/kgsueme/doc/doc2perl.xsl
(Generate patch)

Comparing kgsueme/doc/doc2perl.xsl (file contents):
Revision 1.1 by pcg, Fri Jul 25 19:39:15 2003 UTC vs.
Revision 1.2 by pcg, Fri Jul 25 22:35:50 2003 UTC

367 if ($r->{<xsl:value-of select="@guard-member"/>} <xsl:value-of select="@guard-cond"/>)</xsl:if> 367 if ($r->{<xsl:value-of select="@guard-member"/>} <xsl:value-of select="@guard-cond"/>)</xsl:if>
368 <xsl:text>;</xsl:text> 368 <xsl:text>;</xsl:text>
369</xsl:template> 369</xsl:template>
370 370
371<xsl:template match="member" mode="enc"> 371<xsl:template match="member" mode="enc">
372 <!-- #d#, remove when kgs is repaired --><xsl:if test="@type = 'username'">
373 $_[0]{<xsl:value-of select="@name"/>} =~ /^[A-Za-z][A-Za-z0-9]{0,11}$/
374 or Carp::confess "FATAL: tried to send illegal username '$_[0]{<xsl:value-of select="@name"/>}'";
375 </xsl:if><!--#d#-->
376 enc_<xsl:value-of select="@type"/> defined $_[0]{<xsl:value-of select="@name"/>} ? $_[0]{<xsl:value-of select="@name"/> 372 enc_<xsl:value-of select="@type"/> defined $_[0]{<xsl:value-of select="@name"/>} ? $_[0]{<xsl:value-of select="@name"/>
377 <xsl:text>} : (</xsl:text> 373 <xsl:text>} : (</xsl:text>
378 <xsl:value-of select="@default"/> 374 <xsl:value-of select="@default"/>
379 <xsl:text>);</xsl:text> 375 <xsl:text>);</xsl:text>
380</xsl:template> 376</xsl:template>

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines