diff options
| -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 844a4d8..2454560 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'} <=> |