135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

better discovery of localenv status

Browse Source 
Squashed commit of the following:

commit 6ca234759e27bb7e9e598eaf468d4ea6a0043867
Author: Oliver Gorwits <oliver@cpan.org>
Date:   Tue Jun 11 13:38:19 2013 +0100

    version bump

commit c90ce039899b9a07e2ad833c753d0805e68d8bef
Author: Oliver Gorwits <oliver@cpan.org>
Date:   Tue Jun 11 13:29:11 2013 +0100

    better discovery of localenv status
This commit is contained in:
Oliver Gorwits
2013-06-11 18:10:54 +01:00
parent 3dd69c2063
commit 0bff56f729
7 changed files with 16 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Netdisco/bin/netdisco-deploy
View File

@@ -5,9 +5,8 @@ our $home;
BEGIN {
# try really hard to find a localenv if one isn't already in place.
$home = ($ENV{NETDISCO_HOME} || $ENV{HOME});
eval "require App::Netdisco::Util::Noop";
if ($@) {
if (!exists $ENV{PERL_LOCAL_LIB_ROOT}) {
use File::Spec;
my $localenv = File::Spec->catfile($FindBin::RealBin, 'localenv');
exec($localenv, $0, @ARGV) if -f $localenv;