use Sys::Hostname;
use Socket;
+use POSIX;
use Spong::Daemon;
use Spong::Status qw(status);
# signal the current running spong-server program.
sub handle_signals {
-
+
+ # Clear out signal mask in case we inherit any blocked sigs
+
+ my $sigset = POSIX::SigSet->new;
+ sigprocmask(SIG_SETMASK, $sigset );
+
# Set up some signal handlers to handle our death gracefully, and also
# listen for the HUP signal, and if we se that, we re-exec ourself.
use Sys::Hostname;
use Net::Ping;
use Socket;
+use POSIX;
use Spong::Daemon;
use Spong::Status qw(status);
sub handle_signals {
+ # Clear out signal mask in case we inherit any blocked sigs
+
+ my $sigset = POSIX::SigSet->new;
+ sigprocmask(SIG_SETMASK, $sigset );
+
# Set up some signal handlers to handle our death gracefully, and also
# listen for the HUP signal, and if we se that, we re-exec ourself.