stas 01/12/06 18:34:53
Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm
Log:
@INC fixup: make sure that the dev ./Apache-Test/lib will be first,
followed by dev ./lib, followed by ./blib and finally core Perl libs.
Revision Changes Path
1.91 +6 -1
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
Index: TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.90
retrieving revision 1.91
diff -u -r1.90 -r1.91
--- TestConfig.pm 2001/12/04 03:56:35 1.90
+++ TestConfig.pm 2001/12/07 02:34:53 1.91
@@ -1109,9 +1109,14 @@
sub add_inc {
my $self = shift;
require lib;
+ # make sure that the ./Apache::Test dev libs will be first, followed
+ # by modperl ./lib, followed by ./blib and finally core Perl libs.
+ my @libs = map { "$_/Apache-Test/lib" } qw(. ..);
+ lib::->unimport(@libs);
lib::->import(map "$self->{vars}->{top_dir}/$_",
qw(lib blib/lib blib/arch));
- #print join "\n", @INC, "";
+ lib::->import(@libs);
+ #print join "\n", "add_inc", @INC, "";
}
#freeze/thaw so other processes can access config