Commit 877b8e15 authored by Bruno Coudoin's avatar Bruno Coudoin

Fixed to continue even when a directory is missing

parent 09a1b0a5
...@@ -49,8 +49,12 @@ foreach my $locale (@LOCALES) ...@@ -49,8 +49,12 @@ foreach my $locale (@LOCALES)
{ {
foreach my $subdir (@SUBDIRS) foreach my $subdir (@SUBDIRS)
{ {
opendir DIR, "$BASEDIR/$locale/$subdir" if (! opendir DIR, "$BASEDIR/$locale/$subdir")
or die "cannot open dir $BASEDIR/$locale/$subdir: $!"; {
print "cannot open dir $BASEDIR/$locale/$subdir: $!";
next;
}
foreach my $file ( grep { $_ =~ /\.ogg$/} readdir DIR) foreach my $file ( grep { $_ =~ /\.ogg$/} readdir DIR)
{ {
if("@ALL_FILES" !~ /$subdir\/$file/g) if("@ALL_FILES" !~ /$subdir\/$file/g)
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment