X-Git-Url: https://diplodocus.org/git/flac-archive/blobdiff_plain/e0a7f4f7a7ae12ecbd9e016713bca7962ddf77c6..7eae8b437dc78929d4dd6ed521f62e7330e8d9d3:/flacsplit diff --git a/flacsplit b/flacsplit index 05c2568..26d3bec 100755 --- a/flacsplit +++ b/flacsplit @@ -149,9 +149,12 @@ sub flacsplit { my %tracks_to_tags; my @disc_artist; my @tmp; + my $hack = 1; for my $tag (@tags) { if ($tag =~ /^([^[]+)\[(\d+)]=(.*)/) { push(@{$tracks_to_tags{$2}->{$1}}, $3); + } elsif ($tag =~ /^TITLE=(.*)/) { + push(@{$tracks_to_tags{$hack++}->{'TITLE'}}, $1); } elsif ($tag =~ /^ARTIST=/) { push(@disc_artist, $tag); } else {