diff options
| author | kim <kim@pkgsrc.org> | 2002-12-30 23:12:40 +0000 |
|---|---|---|
| committer | kim <kim@pkgsrc.org> | 2002-12-30 23:12:40 +0000 |
| commit | 634d85f39f1c6c76182d6ca771ec0f435118d33a (patch) | |
| tree | 5efe82416e7c2b1688d1fef2031c9960b99b625a /audio/p5-MP3-Info | |
| parent | 1406149ce221fcc619343ebb3888d3e8b518097e (diff) | |
| download | pkgsrc-634d85f39f1c6c76182d6ca771ec0f435118d33a.tar.gz | |
Provide access to more ID3v2 frames by default.
Diffstat (limited to 'audio/p5-MP3-Info')
| -rw-r--r-- | audio/p5-MP3-Info/Makefile | 3 | ||||
| -rw-r--r-- | audio/p5-MP3-Info/distinfo | 3 | ||||
| -rw-r--r-- | audio/p5-MP3-Info/patches/patch-aa | 77 |
3 files changed, 81 insertions, 2 deletions
diff --git a/audio/p5-MP3-Info/Makefile b/audio/p5-MP3-Info/Makefile index 2415caf52f4..d2ae48a659e 100644 --- a/audio/p5-MP3-Info/Makefile +++ b/audio/p5-MP3-Info/Makefile @@ -1,7 +1,8 @@ -# $NetBSD: Makefile,v 1.3 2002/10/20 17:46:02 seb Exp $ +# $NetBSD: Makefile,v 1.4 2002/12/30 23:12:40 kim Exp $ DISTNAME= MP3-Info-1.01 PKGNAME= p5-${DISTNAME} +PKGREVISION= 1 CATEGORIES= audio perl5 MASTER_SITES= ${MASTER_SITE_PERL_CPAN:=MP3/} diff --git a/audio/p5-MP3-Info/distinfo b/audio/p5-MP3-Info/distinfo index bf12a335913..bc0054aeae7 100644 --- a/audio/p5-MP3-Info/distinfo +++ b/audio/p5-MP3-Info/distinfo @@ -1,4 +1,5 @@ -$NetBSD: distinfo,v 1.2 2002/05/26 10:39:22 wiz Exp $ +$NetBSD: distinfo,v 1.3 2002/12/30 23:12:40 kim Exp $ SHA1 (MP3-Info-1.01.tar.gz) = 78434f1487343e549c5cfe5465b266288b66d810 Size (MP3-Info-1.01.tar.gz) = 51394 bytes +SHA1 (patch-aa) = 8b4ca0d0d1766c180dd8b88369e77a7b462f7d50 diff --git a/audio/p5-MP3-Info/patches/patch-aa b/audio/p5-MP3-Info/patches/patch-aa new file mode 100644 index 00000000000..450eb16e742 --- /dev/null +++ b/audio/p5-MP3-Info/patches/patch-aa @@ -0,0 +1,77 @@ +$NetBSD: patch-aa,v 1.1 2002/12/30 23:12:41 kim Exp $ + +--- Info.pm.orig Tue Feb 26 18:03:29 2002 ++++ Info.pm Mon Dec 30 15:18:03 2002 +@@ -8,7 +8,7 @@ + @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $VERSION $REVISION + @mp3_genres %mp3_genres @winamp_genres %winamp_genres $try_harder + @t_bitrate @t_sampling_freq @frequency_tbl %v1_tag_fields +- @v1_tag_names %v2_tag_names %v2_to_v1_names $AUTOLOAD ++ @v1_tag_names %v2_tag_names %v2_to_symbol $AUTOLOAD + ); + + @ISA = 'Exporter'; +@@ -471,10 +471,10 @@ + %info = %$v2; + $info{TAGVERSION} = $v2h->{version}; + } else { +- for (keys %v2_to_v1_names) { ++ for (keys %v2_to_symbol) { + if (exists $v2->{$_}) { + if ($_ =~ /^TCON?$/ && $v2->{$_} =~ /^.?\((\d+)\)/) { +- $info{$v2_to_v1_names{$_}} = $mp3_genres[$1]; ++ $info{$v2_to_symbol{$_}} = $mp3_genres[$1]; + } else { + my $data = $v2->{$_}; + +@@ -510,7 +510,8 @@ + $data = $u->utf8; + } + } +- $info{$v2_to_v1_names{$_}} = $data; ++ $info{$v2_to_symbol{$_}} = $data; ++ $info{$_} = $data; + } + } + } +@@ -1077,23 +1078,39 @@ + + @v1_tag_names = qw(TITLE ARTIST ALBUM YEAR COMMENT TRACKNUM GENRE); + +- %v2_to_v1_names = ( ++ %v2_to_symbol = ( + # v2.2 tags ++ 'TT1' => 'CONTENTGROUP', + 'TT2' => 'TITLE', ++ 'TT3' => 'SUBTITLE', + 'TP1' => 'ARTIST', ++ 'TP2' => 'BAND', ++ 'TP3' => 'CONDUCTOR', ++ 'TP4' => 'MIXARTIST', ++ 'TCM' => 'COMPOSER', ++ 'TXT' => 'LYRICIST', + 'TAL' => 'ALBUM', + 'TYE' => 'YEAR', + 'COM' => 'COMMENT', + 'TRK' => 'TRACKNUM', + 'TCO' => 'GENRE', # not clean mapping, but ... ++ 'TBP' => 'BPM', + # v2.3 tags ++ 'TIT1' => 'CONTENTGROUP', + 'TIT2' => 'TITLE', ++ 'TIT3' => 'SUBTITLE', + 'TPE1' => 'ARTIST', ++ 'TPE2' => 'BAND', ++ 'TPE3' => 'CONDUCTOR', ++ 'TPE4' => 'MIXARTIST', ++ 'TCOM' => 'COMPOSER', ++ 'TEXT' => 'LYRICIST', + 'TALB' => 'ALBUM', + 'TYER' => 'YEAR', + 'COMM' => 'COMMENT', + 'TRCK' => 'TRACKNUM', + 'TCON' => 'GENRE', ++ 'TBPM' => 'BPM', + ); + + %v2_tag_names = ( |