dougm 00/04/02 21:05:56
Modified: . Changes
t/modules request.t
Log:
modules/request test fix
Revision Changes Path
1.455 +3 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl/Changes,v
retrieving revision 1.454
retrieving revision 1.455
diff -u -r1.454 -r1.455
--- Changes 2000/04/03 03:56:11 1.454
+++ Changes 2000/04/03 04:05:54 1.455
@@ -10,6 +10,9 @@
=item 1.22_01-dev
+modules/request test fix
+[Rick Myers <[EMAIL PROTECTED]>]
+
updated dso+aix Perl patch
[Jens-Uwe Mager <[EMAIL PROTECTED]>]
1.7 +1 -1 modperl/t/modules/request.t
Index: request.t
===================================================================
RCS file: /home/cvs/modperl/t/modules/request.t,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- request.t 1999/04/07 03:34:37 1.6
+++ request.t 2000/04/03 04:05:55 1.7
@@ -125,7 +125,7 @@
my $lines = 0;
local *FH;
open FH, $file or die "open $file $!";
- ++$lines while (<FH>);
+ ++$lines while (my $dummy = <FH>);
close FH;
my(@headers);
if ($Is_dougm) {
