X-Git-Url: https://diplodocus.org/git/flac-archive/blobdiff_plain/cbfbda845d7b4c16e242dc7ce2c682824e5a3151..8690768dfd3ceece4f3d5f505d1716f645e030fc:/flacsplit

diff --git a/flacsplit b/flacsplit
index b598985..26d3bec 100755
--- a/flacsplit
+++ b/flacsplit
@@ -130,10 +130,10 @@ sub flacsplit {
     my $outdir;
     my $outfile;
 
-    open(my $fp, '-|', 'metaflac', '--export-vc-to=-', $fn)
-      or die("open(metaflac --export-vc-to=- $fn): $!");
+    open(my $fp, '-|', 'metaflac', '--export-tags-to=-', $fn)
+      or die("open(metaflac --export-tags-to=- $fn): $!");
     ($artist, $album, $discnum, @tags) = get_tags($fp, $fn);
-    close($fp) or die("close(metaflac --export-vc-to=- $fn): $?");
+    close($fp) or die("close(metaflac --export-tags-to=- $fn): $?");
     for ($artist, $album) {
         s/'/'\\''/g;
         s|/|_|g;
@@ -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 {