diff options
author | Michiel Van Der Kolk <not.valid@email.address> | 2005-04-23 15:38:43 +0000 |
---|---|---|
committer | Michiel Van Der Kolk <not.valid@email.address> | 2005-04-23 15:38:43 +0000 |
commit | 7aa75e1dc0f730cf67e6c58621e7cb687c3048c9 (patch) | |
tree | 2abd4015d35c7036b72558b770f11315a854fa41 /tools/songdb.pl | |
parent | cec134f40928bb2bfa3a4f4ee68dc6e409e5237c (diff) | |
download | rockbox-7aa75e1dc0f730cf67e6c58621e7cb687c3048c9.tar.gz rockbox-7aa75e1dc0f730cf67e6c58621e7cb687c3048c9.tar.bz2 rockbox-7aa75e1dc0f730cf67e6c58621e7cb687c3048c9.zip |
Another broken link.
Albums -> Artist was completely nonsense. fixed.
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@6335 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools/songdb.pl')
-rwxr-xr-x | tools/songdb.pl | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/tools/songdb.pl b/tools/songdb.pl index 844a4d8727..245456079b 100755 --- a/tools/songdb.pl +++ b/tools/songdb.pl @@ -407,11 +407,12 @@ if ($db) { my $str = $t."\x00" x ($maxalbumlen - length($t)); print DB $str; - my $aoffset = $artistcount{$moo[0]} * $artistentrysize; - dumpint($aoffset + $artistindex); # pointer to artist of this album - my @songlist = keys %{$album2songs{$albumid}}; my $id3 = $album2songs{$albumid}{$songlist[0]}; + + my $aoffset = $artistcount{$id3->{'ARTIST'}} * $artistentrysize; + dumpint($aoffset + $artistindex); # pointer to artist of this album + if (defined $id3->{'TRACKNUM'}) { @songlist = sort { $album2songs{$albumid}{$a}->{'TRACKNUM'} <=> |