From: Daniel Kahn Gillmor <dkg@fifthhorseman.net>
Date: Fri, 15 Oct 2010 06:15:44 +0000 (-0400)
Subject: do not kill off child processes during HUP.  let them finish.
X-Git-Tag: msva-perl_debian/0.6-1~3^2~34
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=9e468d4478f140ac45cc455604b1478ca77058d0;p=monkeysphere-validation-agent.git

do not kill off child processes during HUP.  let them finish.
---

diff --git a/Changelog b/Changelog
index 8410b89..3f1c85d 100644
--- a/Changelog
+++ b/Changelog
@@ -2,6 +2,8 @@ msva-perl (0.6~pre) unstable; urgency=low
 
   * add new element to JSON syntax allowing request to override
     keyserver_policy (closes MS #2542)
+  * do not kill off child handling processes on HUP -- let them finish
+    their queries.
 
  -- Daniel Kahn Gillmor <dkg@fifthhorseman.net>  Thu, 14 Oct 2010 16:30:54 -0400
 
diff --git a/Crypt/Monkeysphere/MSVA.pm b/Crypt/Monkeysphere/MSVA.pm
index 94a5c76..2a66347 100755
--- a/Crypt/Monkeysphere/MSVA.pm
+++ b/Crypt/Monkeysphere/MSVA.pm
@@ -655,6 +655,8 @@
     my $self = shift;
     my $server = shift;
 
+    $server->{server}->{leave_children_open_on_hup} = 1;
+
     my $socketcount = @{ $server->{server}->{sock} };
     if ( $socketcount != 1 ) {
       msvalog('error', "%d sockets open; should have been 1.\n", $socketcount);