X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCron.pm;h=42dbe2a5d6053d951db5cff878df0e8cae8e6652;hb=5245f81a18def445c9efe3c3bfcf38b0f4df1b90;hp=1c698f751e5b045808c1ead66791125a848924c2;hpb=15ee0303d77c205e68144dfd8d8a4e0110bbe5ea;p=spider.git diff --git a/perl/DXCron.pm b/perl/DXCron.pm index 1c698f75..42dbe2a5 100644 --- a/perl/DXCron.pm +++ b/perl/DXCron.pm @@ -252,7 +252,7 @@ sub spawn for (@main::listeners) { $_->close_server; } - unless ($^O =~ /^MS/) { + unless ($main::is_win) { $SIG{HUP} = 'IGNORE'; $SIG{CHLD} = $SIG{TERM} = $SIG{INT} = $SIG{__WARN__} = 'DEFAULT'; alarm(0);