Move some stuff around so things are actually initialized before using them. Last second changes are evil.

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@15646 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Jonas Häggqvist 2007-11-16 20:02:02 +00:00
parent 4295149483
commit 1b2561b0d9

View file

@ -410,9 +410,6 @@ sub gentalkclips {
my $d = new DirHandle $dir;
while (my $file = $d->read) {
my ($voice, $wav, $mp3);
$voice = $file;
$wav = sprintf("%s.talk.wav", $path);
# Print some progress information
if (++$i % 10 == 0 and !$verbose) {
print(".");
@ -420,6 +417,10 @@ sub gentalkclips {
# Convert to a complete path
my $path = sprintf("%s/%s", $dir, $file);
$voice = $file;
$wav = sprintf("%s.talk.wav", $path);
# Ignore dot-dirs and talk files
if ($file eq '.' || $file eq '..' || $file =~ /\.talk$/) {
next;