Use English if the language is not found.
This commit is contained in:
1 parent
95419d212d
commit
6906cb3a49
1 file changed
+5
-1
+5
-1
@@ -6,6 +6,7 @@ use warnings;
|
|||||||
|
|
||||||
# Language file parser.
|
# Language file parser.
|
||||||
package Parser::Lang;
|
package Parser::Lang;
|
||||||
|
use API::Log qw(dbug alog);
|
||||||
|
|
||||||
|
|
||||||
# Parser.
|
# Parser.
|
||||||
@@ -15,7 +16,10 @@ sub parse
|
|||||||
|
|
||||||
# Check that the language file exists.
|
# Check that the language file exists.
|
||||||
unless (-e "$Auto::Bin/../lang/$lang.alf") {
|
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.
|
# Open, read and close the file.
|
||||||
|
|||||||
Reference in new issue
Block a user