From 36c4c3f9009404993c7c373e5dad9765ca6c3092 Mon Sep 17 00:00:00 2001
From: Rasmus Steinke <rasi@xssn.at>
Date: Sat, 23 Sep 2017 19:01:35 +0200
Subject: open connection first

---
 clerk_rating_client | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/clerk_rating_client b/clerk_rating_client
index a00de29..20debc0 100755
--- a/clerk_rating_client
+++ b/clerk_rating_client
@@ -5,6 +5,7 @@ use v5.10;
 use warnings;
 use Array::Utils qw(:all);
 #use DDP;
+use Try::Tiny;
 use Config::Simple;
 use File::Spec;
 use strict;
@@ -44,6 +45,8 @@ sub subscribe_ratings_channel {
 
 sub track_rating {
     while(1) {
+        try { $mpd->close(); };
+        $mpd->{socket}->close;
     	$mpd->idle('message');
     	my @blub = $mpd->read_messages;
         foreach (@blub) {
-- 
cgit v1.2.3-24-g4f1b