Changeset 17 in flacrip for trunk

Timestamp:

10/02/14 09:19:15 (10 years ago)

Author:

peter

Message:

changed MBZ_DISCID to MUSICBRAINZ_DISCID, to match the standard MusicBrainz-Vorbis tag mappings

Location:

trunk

Files:

• cd2flac (modified) (1 diff)
• flactrack (modified) (1 diff)
• lib/MusicBrainz.pm (modified) (1 diff)
• mbz (modified) (1 diff)
• mbz2id3 (modified) (1 diff)

trunk/cd2flac

@@ -173 +173 @@
 # copy to permanent location
 copy($flac_file, $archive_flac);
-system 'metaflac', '--set-tag', "MBZ_DISCID=$discid", $archive_flac;
+system 'metaflac', '--set-tag', "MUSICBRAINZ_DISCID=$discid", $archive_flac;
 print "Rip saved as $archive_flac\n";
 system 'eject', $CD_DEVICE;

trunk/flactrack

@@ -48 +48 @@
     } else {
 
-        my $discid = $flac->tags('MBZ_DISCID') or warn "No MBZ_DISCID tag in $FLAC_FILE\n" if $flac;
-        #TODO: calculate TOC and DISCID from cuesheet if there is no MBZ_DISCID tag present
+        my $discid = $flac->tags('MUSICBRAINZ_DISCID') or warn "No MUSICBRAINZ_DISCID tag in $FLAC_FILE\n" if $flac;
+        #TODO: calculate TOC and DISCID from cuesheet if there is no MUSICBRAINZ_DISCID tag present
 
         $info = get_musicbrainz_info($discid);

trunk/lib/MusicBrainz.pm

@@ -68 +68 @@
     my %info;
 
-    #TODO: deprecate the old MBZ tag name
-    $info{MBZ_DISCID} = $discid;
     $info{MUSICBRAINZ_DISCID} = $discid;
 

trunk/mbz

@@ -21 +21 @@
     require Audio::FLAC::Header;
     my $flac = Audio::FLAC::Header->new($FLAC_FILE) or die "Can't read FLAC header from $FLAC_FILE\n";
-    $discid = $flac->tags('MBZ_DISCID') or die "No MBZ_DISCID tag in $FLAC_FILE\n";
+    $discid = $flac->tags('MUSICBRAINZ_DISCID') or die "No MUSICBRAINZ_DISCID tag in $FLAC_FILE\n";
 } else {
     $discid = shift;

trunk/mbz2id3

@@ -200 +200 @@
 my $flac_file = shift;
 
-my $discid = `metaflac --show-tag MBZ_DISCID $flac_file | cut -d = -f 2`;
+my $discid = `metaflac --show-tag MUSICBRAINZ_DISCID $flac_file | cut -d = -f 2`;
 chomp $discid;