From fbeeac227aa136fbcabd63f32873f56431af62a1 Mon Sep 17 00:00:00 2001 From: Marius Gavrilescu Date: Sun, 2 Aug 2015 00:57:39 +0300 Subject: [PATCH] Force scalar context on $ogg->comment --- lib/App/MusicExpo.pm | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) 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, } } -- 2.39.2