remove Path::Class dependency from netdisco-daemon scripts
This commit is contained in:
6
Changes
6
Changes
@@ -1,3 +1,9 @@
|
||||
2.036004 - 2017-07-02
|
||||
|
||||
[BUG FIXES]
|
||||
|
||||
* remove Path::Class dependency from netdisco-daemon scripts
|
||||
|
||||
2.036003 - 2017-06-28
|
||||
|
||||
[NEW FEATURES]
|
||||
|
||||
@@ -7,7 +7,6 @@ use FindBin;
|
||||
FindBin::again();
|
||||
|
||||
use File::Spec;
|
||||
use Path::Class;
|
||||
use Cwd 'realpath';
|
||||
use File::Copy 'move';
|
||||
|
||||
@@ -15,8 +14,8 @@ my $me = realpath(File::Spec->catfile($FindBin::RealBin, $FindBin::RealScript));
|
||||
my $uid = (stat($me))[4] || 0;
|
||||
my $home = ($ENV{NETDISCO_HOME} || (getpwuid($uid))[7] || $ENV{HOME});
|
||||
|
||||
my $old_pid = file($home, 'netdisco-daemon.pid');
|
||||
my $new_pid = file($home, 'netdisco-backend.pid');
|
||||
my $old_pid = File::Spec->catfile($home, 'netdisco-daemon.pid');
|
||||
my $new_pid = File::Spec->catfile($home, 'netdisco-backend.pid');
|
||||
if (-f $old_pid) { move( $old_pid, $new_pid ) }
|
||||
|
||||
my $backend =
|
||||
|
||||
@@ -7,7 +7,6 @@ use FindBin;
|
||||
FindBin::again();
|
||||
|
||||
use File::Spec;
|
||||
use Path::Class;
|
||||
use Cwd 'realpath';
|
||||
|
||||
my $me = realpath(File::Spec->catfile($FindBin::RealBin, $FindBin::RealScript));
|
||||
|
||||
Reference in New Issue
Block a user