| Subject: | Annoying warnings when ENV is incomplete |
Hello,
When running with an incomplete ENV (e.g. via a SVN hook as in my case),
PATH and PERL5LIB might not be defined, which causes warnings. Patch
attached.
Best,
Marco
| Subject: | lib.pm.patch |
*** lib.pm.orig 2010-02-18 10:25:36.713980000 +0100
--- lib.pm 2010-02-18 10:25:36.691048000 +0100
***************
*** 350,366 ****
PERL5LIB => join($Config{path_sep},
$class->install_base_perl_path($path),
$class->install_base_arch_path($path),
! ($ENV{PERL5LIB} ?
! ($interpolate == INTERPOLATE_ENV
! ? ($ENV{PERL5LIB})
! : (($^O ne 'MSWin32') ? '$PERL5LIB' : '%PERL5LIB%' ))
! : ())
),
PATH => join($Config{path_sep},
$class->install_base_bin_path($path),
! ($interpolate == INTERPOLATE_ENV
! ? $ENV{PATH}
! : (($^O ne 'MSWin32') ? '$PATH' : '%PATH%' ))
),
)
}
--- 350,372 ----
PERL5LIB => join($Config{path_sep},
$class->install_base_perl_path($path),
$class->install_base_arch_path($path),
! (
! $ENV{PERL5LIB} ?
! (
! $interpolate == INTERPOLATE_ENV ?
! ($ENV{PERL5LIB} || ())
! : ( ($^O ne 'MSWin32') ? '$PERL5LIB' : '%PERL5LIB%' )
! )
! : ()
! )
),
PATH => join($Config{path_sep},
$class->install_base_bin_path($path),
! (
! $interpolate == INTERPOLATE_ENV ?
! ($ENV{PATH} || ())
! : (($^O ne 'MSWin32') ? '$PATH' : '%PATH%' )
! )
),
)
}