From 9e468d4478f140ac45cc455604b1478ca77058d0 Mon Sep 17 00:00:00 2001
From: Daniel Kahn Gillmor <dkg@fifthhorseman.net>
Date: Fri, 15 Oct 2010 02:15:44 -0400
Subject: [PATCH] do not kill off child processes during HUP.  let them finish.

---
 Changelog                  | 2 ++
 Crypt/Monkeysphere/MSVA.pm | 2 ++
 2 files changed, 4 insertions(+)

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);
-- 
2.26.2