summaryrefslogtreecommitdiffstats
path: root/tools/songdb.pl
diff options
context:
space:
mode:
authorMichiel Van Der Kolk <not.valid@email.address>2005-07-08 22:56:36 +0000
committerMichiel Van Der Kolk <not.valid@email.address>2005-07-08 22:56:36 +0000
commit6fa590b0a74c8328c37e1f25afcb2c64cf5fcedb (patch)
tree4cab635206fbc18b9bca27a2aa626060a1d6cf31 /tools/songdb.pl
parent233b782a85a415e73661cff84fb0eafc4b530fed (diff)
downloadrockbox-6fa590b0a74c8328c37e1f25afcb2c64cf5fcedb.tar.gz
rockbox-6fa590b0a74c8328c37e1f25afcb2c64cf5fcedb.tar.bz2
rockbox-6fa590b0a74c8328c37e1f25afcb2c64cf5fcedb.zip
i wasn't fully awake o.o
git-svn-id: svn://svn.rockbox.org/rockbox/trunk@7080 a1c6a512-1295-4272-9138-f99709370657
Diffstat (limited to 'tools/songdb.pl')
-rwxr-xr-xtools/songdb.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/tools/songdb.pl b/tools/songdb.pl
index cfa18f221c..0377bfd9e6 100755
--- a/tools/songdb.pl
+++ b/tools/songdb.pl
@@ -665,7 +665,7 @@ if ($db) {
#### Build filename offset info
my $l=$fileindex;
my %filenamepos;
- for $f (sort keys %entries) {
+ for $f (sort {uc($a) cmp uc($b)} keys %entries) {
$filenamepos{$f}= $l;
$l += $fileentrysize;
}
@@ -710,7 +710,7 @@ if ($db) {
#### TABLE of file names ###
# path1
- for (sort {uc($a) cmp uc($b)} %entries) {
+ for $f (sort {uc($a) cmp uc($b)} %entries) {
my $str = $f."\x00" x ($maxfilelen- length($f));
my $id3 = $entries{$f};
print DB $str;