From 6c58deb659519e8e298a4e65e340a50ba37d6175 Mon Sep 17 00:00:00 2001 From: epg <> Date: Mon, 26 Mar 2007 01:21:47 +0000 Subject: [PATCH] Support my old, numberless TITLE tags. --- flacsplit | 3 +++ 1 file changed, 3 insertions(+) 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 { -- 2.56.0