Use English if the language is not found.

This commit is contained in:
Elijah Perrault committed 2011-01-17 00:01:15 -07:00
1 parent 95419d212d
commit 6906cb3a49
1 file changed
+5 -1
+5 -1
View File
@@ -6,6 +6,7 @@ use warnings;
# Language file parser.
package Parser::Lang;
use API::Log qw(dbug alog);
# Parser.
@@ -15,7 +16,10 @@ sub parse
# Check that the language file exists.
unless (-e "$Auto::Bin/../lang/$lang.alf") {
return 0;
# Otherwise, use English.
dbug "Language '$lang' not found. Using English.";
alog "Language '$lang' not found. Using English.";
$lang = "en";
}
# Open, read and close the file.