On Thu, Sep 20, 2001 at 06:59:01PM +0800, Stas Bekman wrote:
> gozer wants to use PERL5LIB set from the shell
+1
But I am sure it's not just me ;-)
>
> - this patch respects the previous value of PERL5LIB which was
> originally overriden
>
> Index: Apache-Test/lib/Apache/TestRun.pm
> ===================================================================
> RCS file:
> /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
> retrieving revision 1.51
> diff -u -r1.51 TestRun.pm
> --- Apache-Test/lib/Apache/TestRun.pm 2001/09/06 05:02:51 1.51
> +++ Apache-Test/lib/Apache/TestRun.pm 2001/09/20 10:52:57
> @@ -575,7 +575,11 @@
> }
>
> sub set_perl5lib {
> - $ENV{PERL5LIB} = join $Config{path_sep}, shift->test_inc();
> + my $path = join $Config{path_sep}, shift->test_inc();
> + # fixup PERL5LIB respecting any previous user settings
> + $ENV{PERL5LIB} = exists $ENV{PERL5LIB}
> + ? join $Config{path_sep}, $path
> + : $path;
> }
>
> sub set_perldb_opts {
>
>
>
>
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
--
+----------------------------------------------------+
| Philippe M. Chiasson <[EMAIL PROTECTED]> |
+----------------------------------------------------+
| F9BF E0C2 480E 7680 1AE5 3631 CB32 A107 88C3 A5A5 |
+----------------------------------------------------+
gethostent not implemented : Your C library apparently
doesn't implement gethostent(), probably because if it did,
it'd feel morally obligated to return every hostname on the
Internet.
-- perldiag(1)
perl -e '$$=\${gozer};{$_=unpack(P26,pack(L,$$));/^Just Another Perl
Hacker!\n$/&&print||$$++&&redo}'
PGP signature
