percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-12 14:18:32 +00:00
Code Issues Packages Projects Releases Wiki Activity

The last Daemon.t stabilizer?

Browse Source
This commit is contained in:
Daniel Nichter
2011-08-24 11:26:18 -06:00
parent a1bee06edf
commit fb8f3148f5
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
t/lib/Daemon.t
View File

@@ -34,6 +34,8 @@ my $ret_val = system("$cmd 2 --daemonize --pid $pid_file");
die 'Cannot test Daemon.pm because t/daemonizes.pl is not working' die 'Cannot test Daemon.pm because t/daemonizes.pl is not working'
unless $ret_val == 0; unless $ret_val == 0;
PerconaTest::wait_for_files($pid_file);
my $output = `ps wx | grep '$cmd 2' | grep -v grep`; my $output = `ps wx | grep '$cmd 2' | grep -v grep`;
like($output, qr/$cmd/, 'Daemonizes'); like($output, qr/$cmd/, 'Daemonizes');
ok(-f $pid_file, 'Creates PID file'); ok(-f $pid_file, 'Creates PID file');