dougm 00/05/11 20:43:25
Modified: t/modules request.t
Log:
lib/pod is nuked from my half-dozen perl installs to save space
Revision Changes Path
1.8 +1 -1 modperl/t/modules/request.t
Index: request.t
===================================================================
RCS file: /home/cvs/modperl/t/modules/request.t,v
retrieving revision 1.7
retrieving revision 1.8
diff -u -r1.7 -r1.8
--- request.t 2000/04/03 04:05:55 1.7
+++ request.t 2000/05/12 03:43:24 1.8
@@ -50,7 +50,7 @@
}
#try various sizes
my $dir = "";
- for my $path (@INC) {
+ for my $path (@INC, $ENV{PERL_POD_LIB}) {
last if -d ($dir = "$path/pod");
}
my $dh = DirHandle->new($dir) or die $!;