From: Marius Gavrilescu <marius@ieval.ro>
Date: Sat, 1 Aug 2015 21:57:39 +0000 (+0300)
Subject: Force scalar context on $ogg->comment
X-Git-Tag: 1.000~3
X-Git-Url: http://git.ieval.ro/?p=app-musicexpo.git;a=commitdiff_plain;h=fbeeac227aa136fbcabd63f32873f56431af62a1

Force scalar context on $ogg->comment
---

diff --git a/lib/App/MusicExpo.pm b/lib/App/MusicExpo.pm
index 18ee13c..9422a07 100644
--- a/lib/App/MusicExpo.pm
+++ b/lib/App/MusicExpo.pm
@@ -75,13 +75,13 @@ sub vorbisinfo{
 
 	freeze +{
 		format => 'Vorbis',
-		title => $ogg->comment('TITLE'),
-		artist => $ogg->comment('artist'),
-		year => $ogg->comment('DATE'),
-		album => $ogg->comment('ALBUM'),
-		tracknumber => $ogg->comment('TRACKNUMBER'),
-		tracktotal => $ogg->comment('TRACKTOTAL'),
-		genre => $ogg->comment('GENRE'),
+		title => scalar $ogg->comment('TITLE'),
+		artist => scalar $ogg->comment('artist'),
+		year => scalar $ogg->comment('DATE'),
+		album => scalar $ogg->comment('ALBUM'),
+		tracknumber => scalar $ogg->comment('TRACKNUMBER'),
+		tracktotal => scalar $ogg->comment('TRACKTOTAL'),
+		genre => scalar $ogg->comment('GENRE'),
 		file => scalar fileparse $file,
 	}
 }