richter 2004/03/14 22:21:31
Modified: . Changes.pod Embperl.pm Embperl.xs TODO
Embperl Object.pm
test/cmp selecttab.htm upload.htm
test/html upload.htm
Log:
2.0b11
Revision Changes Path
1.238 +3 -5 embperl/Changes.pod
Index: Changes.pod
===================================================================
RCS file: /home/cvs/embperl/Changes.pod,v
retrieving revision 1.237
retrieving revision 1.238
diff -u -r1.237 -r1.238
--- Changes.pod 14 Mar 2004 18:54:43 -0000 1.237
+++ Changes.pod 15 Mar 2004 06:21:31 -0000 1.238
@@ -1,8 +1,6 @@
=pod
-=head1 2.0b11
-
-This version is currently under developement. You can get it from the
L<CVS|CVS.pod>.
+=head1 2.0b11 15. March 2004
- Fixed problem with JavaScript code in Form::Validate, when fields names
are non JavaScript Identifier.
@@ -29,8 +27,8 @@
Embperl::Object::Execute.
- Fixed problem with print OUT and call of subroutines as first statement
of a subroutine. Reported by various people.
-
-
+
+
=head1 2.0b10 23. Jan 2004
- Added -break parameter for haveing precondition to
1.187 +2 -2 embperl/Embperl.pm
Index: Embperl.pm
===================================================================
RCS file: /home/cvs/embperl/Embperl.pm,v
retrieving revision 1.186
retrieving revision 1.187
diff -u -r1.186 -r1.187
--- Embperl.pm 14 Feb 2004 14:49:54 -0000 1.186
+++ Embperl.pm 15 Mar 2004 06:21:31 -0000 1.187
@@ -47,7 +47,7 @@
@ISA = qw(Exporter DynaLoader);
-$VERSION = '2.0b10' ;
+$VERSION = '2.0b11' ;
if ($modperl = $ENV{MOD_PERL})
1.55 +0 -7 embperl/Embperl.xs
Index: Embperl.xs
===================================================================
RCS file: /home/cvs/embperl/Embperl.xs,v
retrieving revision 1.54
retrieving revision 1.55
diff -u -r1.54 -r1.55
--- Embperl.xs 14 Mar 2004 20:17:41 -0000 1.54
+++ Embperl.xs 15 Mar 2004 06:21:31 -0000 1.55
@@ -38,13 +38,6 @@
OUTPUT:
RETVAL
-int
-embperl_ApInitDone()
-CODE:
- RETVAL = embperl_ApInitDone () ;
-OUTPUT:
- RETVAL
-
#ifdef APACHEXXX
1.123 +0 -2 embperl/TODO
Index: TODO
===================================================================
RCS file: /home/cvs/embperl/TODO,v
retrieving revision 1.122
retrieving revision 1.123
diff -u -r1.122 -r1.123
--- TODO 13 Mar 2004 13:04:02 -0000 1.122
+++ TODO 15 Mar 2004 06:21:31 -0000 1.123
@@ -1,8 +1,6 @@
TODO before Embperl 2.0 release
-- print OUT and sub [Carlos 3.7.2003]
-
- preload on Apache startup problem [Neil Gunton 25.1.04]
- en/de select parameter passing in eg/web/header.epl
1.6 +2 -2 embperl/Embperl/Object.pm
Index: Object.pm
===================================================================
RCS file: /home/cvs/embperl/Embperl/Object.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -r1.5 -r1.6
--- Object.pm 11 Mar 2004 22:31:12 -0000 1.5
+++ Object.pm 15 Mar 2004 06:21:31 -0000 1.6
@@ -48,7 +48,7 @@
@ISA = qw(Exporter DynaLoader);
-$VERSION = '2.0b10';
+$VERSION = '2.0b11';
$volume = (File::Spec -> splitpath ($Embperl::cwd))[0] ;
1.2 +2 -2 embperl/test/cmp/selecttab.htm
Index: selecttab.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/selecttab.htm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- selecttab.htm 13 Feb 2004 20:39:19 -0000 1.1
+++ selecttab.htm 15 Mar 2004 06:21:31 -0000 1.2
@@ -40,8 +40,8 @@
$VAR1 = [
''
];
-$VAR2 = 0;
-$VAR3 = 0;
+^\$VAR2 = \'?0\'?;
+^\$VAR3 = \'?0\'?;
<table width="100%" border="0" cellspacing="2" cellpadding="0">
<tr>
<td class="ltAlign">
1.15 +2 -6 embperl/test/cmp/upload.htm
Index: upload.htm
===================================================================
RCS file: /home/cvs/embperl/test/cmp/upload.htm,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -r1.14 -r1.15
--- upload.htm 14 Mar 2004 20:17:41 -0000 1.14
+++ upload.htm 15 Mar 2004 06:21:31 -0000 1.15
@@ -12,12 +12,8 @@
^CGI-Version
^cgiok
filehandle: Fh
-Info: $VAR1 = {
- 'Content-Disposition' => 'form-data; name="upload";
filename="12upload-filename"',
- 'Content-Type' => 'test/plain'
- };
-^\$VAR2 = bless\( \\\*\{\'Fh::fh.*?upload-filename\'\}, \'Fh\' \)\;
-
+Info: Content-Disposition = form-data; name="upload";
filename="12upload-filename"
+Content-Type = test/plain
no: 1
size: 2048
no: 2
1.14 +1 -1 embperl/test/html/upload.htm
Index: upload.htm
===================================================================
RCS file: /home/cvs/embperl/test/html/upload.htm,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -r1.13 -r1.14
--- upload.htm 14 Mar 2004 20:17:42 -0000 1.13
+++ upload.htm 15 Mar 2004 06:21:31 -0000 1.14
@@ -14,7 +14,7 @@
CGI-Version: [+ $CGI::VERSION +]
cgiok [+ $cgiok +]
filehandle: [+ ref $fdat{upload} +]
-Info: [+ do { local $Data::Dumper::Sortkeys = 1 ; Dumper
($fdat{-upload}, $fdat{upload}) } +]
+Info: [+ join ("\n", map { "$_ = $fdat{-upload}{$_}" } sort keys
%{$fdat{-upload}}) +]
[-
$no = 1 ;
while ($size = read($fdat{upload}, $buffer, 2048))
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
