dougm 02/04/06 20:18:02
Modified: perl-framework/Apache-Test/lib/Apache TestConfigParse.pm
Log:
avoid bug in rel2abs that results in error message:
"Unsuccessful stat on filename containing newline"
if we try server_file_rel2abs before ServerRoot is known.
(shouldn't normally happen)
Revision Changes Path
1.22 +6 -0
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfigParse.pm
Index: TestConfigParse.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfigParse.pm,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -r1.21 -r1.22
--- TestConfigParse.pm 4 Apr 2002 17:16:13 -0000 1.21
+++ TestConfigParse.pm 7 Apr 2002 04:18:02 -0000 1.22
@@ -48,6 +48,12 @@
my($self, $file, $base) = @_;
$base ||= $self->{inherit_config}->{ServerRoot};
+
+ unless ($base) {
+ warning "unable to resolve $file (ServerRoot not defined yet?)";
+ return $file;
+ }
+
rel2abs $file, $base;
}
