Now installing lang/ properly, and config+language files are pulled from the current working directory.
This commit is contained in:
1 parent
6033904d0d
commit
580770c5b8
4 files changed
+9
-8
No files matched your search
+3
-3
@@ -13,15 +13,15 @@ sub parse
|
||||
my ($lang) = @_;
|
||||
|
||||
# Check that the language file exists.
|
||||
unless (-e "$Auto::Bin/../lang/$lang.alf") {
|
||||
if (!-e "$Auto::bin{lng}/$lang.alf") {
|
||||
# Otherwise, use English.
|
||||
dbug "Language '$lang' not found. Using English.";
|
||||
alog "Language '$lang' not found. Using English.";
|
||||
$lang = "en";
|
||||
$lang = 'en';
|
||||
}
|
||||
|
||||
# Open, read and close the file.
|
||||
open(my $FALF, q{<}, "$Auto::Bin/../lang/$lang.alf") or return 0;
|
||||
open(my $FALF, '<', "$Auto::bin{lng}/$lang.alf") or return 0;
|
||||
my @fbuf = <$FALF>;
|
||||
close $FALF;
|
||||
|
||||
|
||||
Reference in new issue
Block a user