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

Daemons now log to ~/logs/netdisco-{web,daemon}.log

Browse Source
This commit is contained in:
Oliver Gorwits
2013-01-05 20:34:21 +00:00
parent 43ca40e28c
commit 16ffbd455e
3 changed files with 13 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Netdisco/bin/netdisco-daemon
View File

@@ -10,10 +10,16 @@ BEGIN {
}
}
use Path::Class;
my $log_dir = dir($ENV{HOME}, 'logs');
mkdir $log_dir if ! -d $log_dir;
my $program = "$ENV{HOME}/bin/netdisco-daemon-fg";
Daemon::Control->new({
name => 'Netdisco Daemon',
program => ($ENV{NETDISCO_DAEMON} || $program),
pid_file => "$ENV{HOME}/netdisco-daemon.pid",
stderr_file => file($log_dir, 'netdisco-daemon.log'),
stdout_file => file($log_dir, 'netdisco-daemon.log'),
})->run;

6
Netdisco/bin/netdisco-web
View File

@@ -10,9 +10,15 @@ BEGIN {
}
}
use Path::Class;
my $log_dir = dir($ENV{HOME}, 'logs');
mkdir $log_dir if ! -d $log_dir;
Daemon::Control->new({
name => 'Netdisco Web',
program => 'plackup',
program_args => ["$ENV{HOME}/bin/netdisco-web-fg"],
pid_file => "$ENV{HOME}/netdisco-web.pid",
stderr_file => file($log_dir, 'netdisco-web.log'),
stdout_file => file($log_dir, 'netdisco-web.log'),
})->run;