Merge remote-tracking branch 'origin/new/bug_7346'
This commit is contained in:
commit
9880b3ad05
1 changed files with 4 additions and 0 deletions
|
@ -49,6 +49,10 @@ my ($cmd, $lang) = @ARGV;
|
|||
$cmd = lc $cmd;
|
||||
if ( $cmd =~ /create|install|update/ ) {
|
||||
my $installer = LangInstaller->new( $lang, $pref );
|
||||
if ( $cmd !~ /create/ && $lang && not $lang ~~ $installer->{langs} ) {
|
||||
print "Unsupported language: $lang\n";
|
||||
exit;
|
||||
}
|
||||
if ( $all ) {
|
||||
usage() if $cmd eq 'create';
|
||||
for my $lang ( @{$installer->{langs}} ) {
|
||||
|
|
Loading…
Reference in a new issue