[Pkg-privacy-commits] [msva-perl] 93/356: clean cruft out of MSVA.pm

[Ximin Luo]

This is an automated email from the git hooks/post-receive script.

infinity0 pushed a commit to branch debian
in repository msva-perl.

commit 669445491e58bfc9817600a275ce573d494049f8
Author: Daniel Kahn Gillmor <dkg at fifthhorseman.net>
Date:   Fri Mar 12 00:10:23 2010 -0500

    clean cruft out of MSVA.pm
---
 Net/Server/MSVA.pm | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/Net/Server/MSVA.pm b/Net/Server/MSVA.pm
index 719487d..805700b 100644
--- a/Net/Server/MSVA.pm
+++ b/Net/Server/MSVA.pm
@@ -19,10 +19,8 @@
 { package Net::Server::MSVA;
   use strict;
   use base qw(Net::Server::Fork);
-  use Net::Server::SIG qw(register_sig);
 
   my $msva;
-  my $oldsighdlr;
   # guarantee initial failure -- this will be cleared after we bind
   # successfully.
   my $exit_status = 13;
@@ -42,7 +40,6 @@
   # FIXME: this is an override of an undocumented interface of
   # Net::Server.  it would be better to use a documented hook, if
   # https://rt.cpan.org/Public/Bug/Display.html?id=55485 was resolved
-
   sub delete_child {
     my $self = shift;
     my $pid = shift;
@@ -59,16 +56,9 @@
   sub run {
     my $self = shift;
     my $options = { @_ };
-
-#  check_for_dequeue=>10, max_dequeue=>1
-
     if (exists $options->{msva}) {
       $msva = $options->{msva};
     };
-#    $oldsighdlr = $NET::Server::SIG::_SIG_SUB{CHLD};
-#    register_sig(USR2 => \&child_dies,
-#                 CHLD => \&child_dies);
-
     $self->SUPER::run(@_);
   }
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-privacy/packages/msva-perl.git