Index: CPAN/Audio/APETags.pm =================================================================== RCS file: /home/cvs/cvsroot/slim/server/CPAN/Audio/APETags.pm,v retrieving revision 1.2 diff -u -p -B -r1.2 APETags.pm --- CPAN/Audio/APETags.pm 13 May 2004 17:57:32 -0000 1.2 +++ CPAN/Audio/APETags.pm 30 Sep 2004 05:06:05 -0000 @@ -137,7 +137,7 @@ sub _parseTags { my $fh = $self->{'fileHandle'}; my ($tmp,$tagLen,$tagItemKey,$tagFlags,$tagItemVal); - seek $fh, 2, 0; + seek $fh, 0, 2; my $filelen = tell $fh; # Seek to the location of the known APE header/footer @@ -182,7 +182,7 @@ sub _parseTags { $tagFlags = _grabInt32(\$tmp); if ($tmp =~ /^(.*?)\0/) { - $tagItemKey = $1; + $tagItemKey = uc($1); } $tmp =~ s/^.*?\0//; Index: Slim/Formats/Musepack.pm =================================================================== RCS file: /home/cvs/cvsroot/slim/server/Slim/Formats/Musepack.pm,v retrieving revision 1.1 diff -u -p -B -r1.1 Musepack.pm --- Slim/Formats/Musepack.pm 6 May 2004 02:25:27 -0000 1.1 +++ Slim/Formats/Musepack.pm 30 Sep 2004 05:06:05 -0000 @@ -22,7 +22,7 @@ use Audio::Musepack; use MP3::Info (); my %tagMapping = ( - 'TRACKNUMBER' => 'TRACKNUM', + 'TRACK' => 'TRACKNUM', 'DATE' => 'YEAR', 'DISCNUMBER' => 'DISC', );