X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=lib%2FApp%2FMusicExpo.pm;h=7cdf6e29441f15fdf2493d1e893c8e966aeb66e6;hb=e659895fb7970472cf756b91ac6f9f63979c4b05;hp=a25a132ba1427f847c361c4760244f9a762b8b9e;hpb=b484a12921835e84ece975361da2c7b209beba6b;p=app-musicexpo.git

diff --git a/lib/App/MusicExpo.pm b/lib/App/MusicExpo.pm
index a25a132..7cdf6e2 100644
--- a/lib/App/MusicExpo.pm
+++ b/lib/App/MusicExpo.pm
@@ -3,7 +3,7 @@ use v5.14;
 use strict;
 use warnings;
 
-our $VERSION = '0.005';
+our $VERSION = '0.006';
 
 use Audio::FLAC::Header qw//;
 use HTML::Template::Compiled qw//;
@@ -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,
 	}
 }
@@ -154,7 +154,7 @@ sub run {
 		for my $ver (@versions) {
 			push @{$entry{formats}}, {format => $ver->{format}, file => $ver->{file}};
 			for my $key (keys %$ver) {
-				$entry{$key} = $ver->{$key} if $ver->{$key} ne '?';
+				$entry{$key} = $ver->{$key} if $ver->{$key} && $ver->{$key} ne '?';
 			}
 		}
 		delete $entry{$_} for qw/format file/;