From 0de10c4e24cd87a5e4981cc8d7ee739c90bbe328 Mon Sep 17 00:00:00 2001
From: Rasmus Steinke <rasi@xssn.at>
Date: Sun, 6 Aug 2017 18:44:32 +0200
Subject: explicitly encode uri to utf8

---
 clerk | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'clerk')

diff --git a/clerk b/clerk
index bc98868..eb88d1d 100755
--- a/clerk
+++ b/clerk
@@ -8,6 +8,7 @@ use utf8;
 use Config::Simple;
 use Data::MessagePack;
 #use DDP;
+use Encode qw(decode encode);
 use File::Basename;
 use File::Path qw(make_path);
 use File::Slurper 'read_binary';
@@ -261,6 +262,7 @@ sub do_action {
 	} elsif ($context eq "tracks") {
 		foreach my $line (split /\n/, $in) {
 			my $uri = (split /[\t\n]/, $line)[-1];
+			$uri = decode('UTF-8', $uri );
 			$mpd->add($uri);
 		}
 	}
-- 
cgit v1.2.3-24-g4f1b