Changeset 40 in flacrip for trunk/lib/DiscFlacFile.pm

Timestamp:

05/08/15 14:48:29 (9 years ago)

Author:

peter

Message:

If given a barcode, get_musicbrainz_info() will attempt to match a release on
the DiscID and the barcode.

• get_musicbrainz_info() and select_release() take a hashref with discid and barcode keys
• mbz script takes a --barcode argument; however, if --flac is given, it dtermines the barcode from the BARCODE tag in the FLAC file
• added a barcode method to the DiscFlacFile class
• corrected the call to Audio::FLAC::Header::info to a call to tags for the Vorbis tags
• removed the superfluous getprops script

File:

• trunk/lib/DiscFlacFile.pm (modified) (1 diff)

trunk/lib/DiscFlacFile.pm

@@ -36 +36 @@
 sub discid {
     my $self = shift;
-    return $self->flac->info('MUSICBRAINZ_DISCID') || $self->tracks->discid;
+    return $self->flac->tags('MUSICBRAINZ_DISCID') || $self->tracks->discid;
+}
+
+sub barcode {
+    my $self = shift;
+    return $self->flac->tags('BARCODE');
 }