Client does not close

ukautz · Nov 23, 2011 · 79e3a6e · 79e3a6e
1 parent 6c3b4fe
commit 79e3a6e
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/lib/Mail/Decency/Core/NetServer/Postfix.pm b/lib/Mail/Decency/Core/NetServer/Postfix.pm
@@ -58,6 +58,8 @@ sub process_request {
         $attrib{ $key } = $value;
         $ENV{ POSTFIX_DEBUG } && warn "<< IN '$line'\n";
     }
+
+    eval { close $client; 1; } || warn "OOps: $@";
     undef $client;
     delete $self->{ server }->{ client };