From: Marius Gavrilescu 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/?a=commitdiff_plain;h=fbeeac227aa136fbcabd63f32873f56431af62a1;p=app-musicexpo.git 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, } }