diff options
Diffstat (limited to 'perl-install/lang.pm')
| -rw-r--r-- | perl-install/lang.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/lang.pm b/perl-install/lang.pm index 3385248d6..1b571ddd6 100644 --- a/perl-install/lang.pm +++ b/perl-install/lang.pm @@ -29,7 +29,7 @@ sub list { map { $_->[0] } values %languages } sub text2lang { my ($t) = @_; while (my ($k, $v) = each %languages) { - $v->[0] eq $t and return $k; + lc($v->[0]) eq lc($t) and return $k; } die "unknown language $t"; } |