summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorP. J. McDermott <pj@pehjota.net>2014-03-11 17:59:33 (EDT)
committer P. J. McDermott <pj@pehjota.net>2014-07-14 21:55:59 (EDT)
commitb4728dfb0ac46abd12576d0c26a5f6bc66a0b679 (patch)
tree1a43613be6c6d31a2d7bf4af0029a4b96d994610
parent15e7b17b2c60c440dc83236d1f21df68a203e12e (diff)
downloadjamaldo-b4728dfb0ac46abd12576d0c26a5f6bc66a0b679.zip
jamaldo-b4728dfb0ac46abd12576d0c26a5f6bc66a0b679.tar.gz
jamaldo-b4728dfb0ac46abd12576d0c26a5f6bc66a0b679.tar.bz2
Set the encoding on the comments file stream
-rwxr-xr-xjamaldo.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/jamaldo.pl b/jamaldo.pl
index e1e94db..1b4ff81 100755
--- a/jamaldo.pl
+++ b/jamaldo.pl
@@ -148,6 +148,7 @@ sub get_track
$comments_fname = sprintf("%s/%02d - %s.comments",
$dir, $track->{"position"}, $name);
open($comments_fh, ">", $comments_fname);
+ binmode($comments_fh, ":encoding(UTF-8)");
while (($vorbis_field, $jamendo_field) = each(%fields)) {
$jamendo_field = $track->{$jamendo_field};
$jamendo_field =~ s/\n/\\n/g;