comparison lib/Test/Nginx.pm @ 195:d73ab4b6ef4a

Tests: fix run_daemon() in case of exec() failure.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 10 Jan 2012 23:02:33 +0400
parents 5db96b64cead
children 5137f27935b4
comparison
equal deleted inserted replaced
194:5db96b64cead 195:d73ab4b6ef4a
250 if (ref($code) eq 'CODE') { 250 if (ref($code) eq 'CODE') {
251 $code->(@args); 251 $code->(@args);
252 exit 0; 252 exit 0;
253 } else { 253 } else {
254 exec($code, @args); 254 exec($code, @args);
255 exit 0;
255 } 256 }
256 } 257 }
257 258
258 $self->{_daemons} = [] unless defined $self->{_daemons}; 259 $self->{_daemons} = [] unless defined $self->{_daemons};
259 push @{$self->{_daemons}}, $pid; 260 push @{$self->{_daemons}}, $pid;