From 4229cb80ad1ac17269a8c48f22e4f91d0e774c62 Mon Sep 17 00:00:00 2001
From: Milan <mc@radiopiloten.de>
Date: Sat, 2 May 2020 19:16:55 +0200
Subject: [PATCH] read config as UTF8

---
 lib/calcms/config.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/calcms/config.pm b/lib/calcms/config.pm
index 60e2072..07ea1bf 100644
--- a/lib/calcms/config.pm
+++ b/lib/calcms/config.pm
@@ -4,6 +4,7 @@ use strict;
 use warnings;
 no warnings 'redefine';
 
+
 use FindBin();
 
 #use base 'Exporter';
@@ -30,7 +31,7 @@ sub read_config {
     my @stack = ();
     my $entry = {};
 
-    open my $fh, '<', $file or die;
+    open my $fh, '<:encoding(UTF-8)', $file or die;
     while ( my $line = <$fh> ) {
         chomp $line;