Date: Tuesday November 5, 2002 @ 22:45
Author: matt
Update of /home/cvs/AxKit-XSP-PerForm/stylesheets
In directory ted.sergeant.org:/home/matt/Perl/AxKit-XSP-PerForm/stylesheets
Modified Files:
perform_html.xps perform_html.xsl
Log Message:
Patches to multi and single select to support index attribute
Log:
PR:
Index: perform_html.xps
===================================================================
RCS file: /home/cvs/AxKit-XSP-PerForm/stylesheets/perform_html.xps,v
retrieving revision 1.1
retrieving revision 1.2
diff -b -u -r1.1 -r1.2
--- perform_html.xps 2002/01/24 08:16:07 1.1
+++ perform_html.xps 2002/11/05 22:45:47 1.2
@@ -114,8 +114,21 @@
$t->{'single_select'}{'testcode'} = sub {
my ($node, $t) = @_;
my $name = findvalue('@name|name', $node);
+ my $index = findvalue('@index|index', $node) || '';
$t->{'pre'} = qq|
- <select name="$name">
+ <select name="$name$index">
+ |.apply_templates('options/option', $node);
+ $t->{'post'} = "</select>".apply_templates("error", $node);
+ $t->{'showtag'} = 0;
+ return -1;
+};
+
+$t->{'multi_select'}{'testcode'} = sub {
+ my ($node, $t) = @_;
+ my $name = findvalue('@name|name', $node);
+ my $index = findvalue('@index|index', $node) || '';
+ $t->{'pre'} = qq|
+ <select multiple="multiple" name="$name$index">
|.apply_templates('options/option', $node);
$t->{'post'} = "</select>".apply_templates("error", $node);
$t->{'showtag'} = 0;
Index: perform_html.xsl
===================================================================
RCS file: /home/cvs/AxKit-XSP-PerForm/stylesheets/perform_html.xsl,v
retrieving revision 1.6
retrieving revision 1.7
diff -b -u -r1.6 -r1.7
--- perform_html.xsl 2002/06/12 06:29:17 1.6
+++ perform_html.xsl 2002/11/05 22:45:47 1.7
@@ -74,14 +74,14 @@
</xsl:template>
<xsl:template match="single_select">
- <select name="{@name|name}">
+ <select name="{@name|name}{@index|index}">
<xsl:apply-templates select="options/option"/>
</select>
<xsl:apply-templates select="error"/>
</xsl:template>
<xsl:template match="multi_select">
- <select multiple="multiple" name="{@name|name}">
+ <select multiple="multiple" name="{@name|name}{@index|index}">
<xsl:apply-templates select="options/option"/>
</select>
<xsl:apply-templates select="error"/>
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
