From e81855fe85eec684fe8a4af6c855ba1d9e60f765 Mon Sep 17 00:00:00 2001
From: Alexander Sulfrian <alex@spline.inf.fu-berlin.de>
Date: Wed, 28 Oct 2015 18:48:08 +0100
Subject: log.pl: Close socket _after_ finishing sending

---
 log.pl | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/log.pl b/log.pl
index 16786a0..843c149 100755
--- a/log.pl
+++ b/log.pl
@@ -22,9 +22,10 @@ tcp_connect 'unix/', $log_socket, sub {
         $h->push_write($_);
     }
 
-    $h->push_shutdown;
-    $h->destroy;
-    $cv->send;
+    $h->on_drain (sub {
+        undef $h;
+        $cv->send;
+    });
 };
 
 $cv->recv;
-- 
cgit v1.2.3-1-g7c22