diff -Nru libnet-server-perl-2.007/debian/changelog libnet-server-perl-2.007/debian/changelog --- libnet-server-perl-2.007/debian/changelog 2013-06-16 13:04:45.000000000 +0000 +++ libnet-server-perl-2.007/debian/changelog 2013-06-21 12:00:55.000000000 +0000 @@ -1,3 +1,10 @@ +libnet-server-perl (2.007-3) unstable; urgency=low + + * Fix regression introduced by "SIGCHLD vs. SIGCLD" patch: extend CLD change + to all functions of SIG.pm (Closes: #712714) + + -- Xavier Guimard Fri, 21 Jun 2013 06:13:49 +0200 + libnet-server-perl (2.007-2) unstable; urgency=low * Update spelling errors patch diff -Nru libnet-server-perl-2.007/debian/patches/correct-SIG-confusion.patch libnet-server-perl-2.007/debian/patches/correct-SIG-confusion.patch --- libnet-server-perl-2.007/debian/patches/correct-SIG-confusion.patch 2013-06-16 13:04:45.000000000 +0000 +++ libnet-server-perl-2.007/debian/patches/correct-SIG-confusion.patch 2013-06-21 12:00:55.000000000 +0000 @@ -3,7 +3,7 @@ Bug-Debian: http://bugs.debian.org/708180 Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=85308 Reviewed-By: Xavier Guimard -Last-Update: 2013-06-15 +Last-Update: 2013-06-20 --- a/lib/Net/Server/SIG.pm +++ b/lib/Net/Server/SIG.pm @@ -12,8 +12,30 @@ my $ref = ref($code_ref); + # Added by Debian maintainer to close #708180 -+ $sig = 'CLD' if ($sig eq 'CHLD'); ++ $sig = 'CHLD' if ($sig eq 'CLD'); + if (! $ref) { if ($code_ref eq 'DEFAULT') { delete $_SIG{$sig}; +@@ -66,6 +69,10 @@ + sub check_sigs { + my @found; + foreach my $sig (keys %_SIG){ ++ ++ # Added by Debian maintainer to close #712714 ++ $sig = 'CHLD' if ($sig eq 'CLD'); ++ + next if ! $_SIG{$sig}; + $_SIG{$sig} = 0; + push @found, $sig; +@@ -76,6 +83,10 @@ + + sub sig_is_registered { + my $sig = shift; ++ ++ # Added by Debian maintainer to close #712714 ++ $sig = 'CHLD' if ($sig eq 'CLD'); ++ + return $_SIG_SUB{$sig}; + } +