richter 2002/07/01 03:32:17
Modified: . Tag: Embperl2c Changes.pod
Embperl/Form/Validate Tag: Embperl2c Default.pm
Log:
fix typo in form::validate
Revision Changes Path
No revision
No revision
1.129.4.83 +1 -0 embperl/Changes.pod
Index: Changes.pod
===================================================================
RCS file: /home/cvs/embperl/Changes.pod,v
retrieving revision 1.129.4.82
retrieving revision 1.129.4.83
diff -u -r1.129.4.82 -r1.129.4.83
--- Changes.pod 1 Jul 2002 06:57:12 -0000 1.129.4.82
+++ Changes.pod 1 Jul 2002 10:32:17 -0000 1.129.4.83
@@ -7,6 +7,7 @@
- libxml now searchs through Embperl search path when includeing external
entities,
so for example <xsl:include> directives searchs files the same way as Execute
does under Embperl::Object.
+ - fixed typo in JavaScript code for Form::Validate
=head1 2.0b8 (BETA) 25. Juni 2002
No revision
No revision
1.1.2.4 +3 -3 embperl/Embperl/Form/Validate/Attic/Default.pm
Index: Default.pm
===================================================================
RCS file: /home/cvs/embperl/Embperl/Form/Validate/Attic/Default.pm,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -r1.1.2.3 -r1.1.2.4
--- Default.pm 8 Mar 2002 06:44:14 -0000 1.1.2.3
+++ Default.pm 1 Jul 2002 10:32:17 -0000 1.1.2.4
@@ -344,7 +344,7 @@
{
my ($self, $arg, $pref) = @_ ;
- return ("obj.value.search(/^[$arg]*$/) >= 0", ['validate_must_only_contain',
"'+obj.value+'", $arg]) ;
+ return ("obj.value.search(/^[$arg]*\$/) >= 0", ['validate_must_only_contain',
"'+obj.value+'", $arg]) ;
}
# --------------------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
