stas 2004/02/02 16:23:34
Modified: perl-framework/Apache-Test/lib/Apache TestRun.pm
Log:
can't load FindBin at compile time as it affects programs, whose $0 is not
necessarily executable (registry scripts loading Apache::Test), when
FindBin croaks. So move it to 'require FindBin' where it's need (which is
only the build time of modperl-2.0/a-t).
Revision Changes Path
1.147 +1 -1
httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm
Index: TestRun.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
retrieving revision 1.146
retrieving revision 1.147
diff -u -u -r1.146 -r1.147
--- TestRun.pm 2 Feb 2004 18:41:04 -0000 1.146
+++ TestRun.pm 3 Feb 2004 00:23:34 -0000 1.147
@@ -19,7 +19,6 @@
use File::Basename qw(basename dirname);
use Getopt::Long qw(GetOptions);
use Config;
-use FindBin;
use constant IS_APACHE_TEST_BUILD =>
Apache::TestConfig::IS_APACHE_TEST_BUILD;
@@ -1252,6 +1251,7 @@
# 'make install' will then pick and install system-wide. but
# remember that $FindBin::Bin is the location of top-level
# 'Makefile.PL'
+ require FindBin; # load it only for this particular use
my $path = catfile $FindBin::Bin, "lib",
Apache::TestRun::CUSTOM_CONFIG_FILE;
