ExtensionsLst.pm (764319a5) | ExtensionsLst.pm (1e4dc01f) |
---|---|
1#************************************************************** 2# 3# Licensed to the Apache Software Foundation (ASF) under one 4# or more contributor license agreements. See the NOTICE file 5# distributed with this work for additional information 6# regarding copyright ownership. The ASF licenses this file 7# to you under the Apache License, Version 2.0 (the 8# "License"); you may not use this file except in compliance --- 507 unchanged lines hidden (view full) --- 516} 517 518 519 520 521=head3 DownloadExtensions 522 This function is intended to be called during bootstrapping. It extracts the set of extensions 523 that will be used later, when the installation sets are built. | 1#************************************************************** 2# 3# Licensed to the Apache Software Foundation (ASF) under one 4# or more contributor license agreements. See the NOTICE file 5# distributed with this work for additional information 6# regarding copyright ownership. The ASF licenses this file 7# to you under the Apache License, Version 2.0 (the 8# "License"); you may not use this file except in compliance --- 507 unchanged lines hidden (view full) --- 516} 517 518 519 520 521=head3 DownloadExtensions 522 This function is intended to be called during bootstrapping. It extracts the set of extensions 523 that will be used later, when the installation sets are built. |
524 The set of languages is taken from the WITH_LANG environment variable. |
|
524=cut 525sub DownloadExtensions () 526{ 527 if (defined $ENV{'ENABLE_BUNDLED_DICTIONARIES'} 528 && $ENV{'ENABLE_BUNDLED_DICTIONARIES'} eq "YES") 529 { 530 my $full_file_name = Prepare(); | 525=cut 526sub DownloadExtensions () 527{ 528 if (defined $ENV{'ENABLE_BUNDLED_DICTIONARIES'} 529 && $ENV{'ENABLE_BUNDLED_DICTIONARIES'} eq "YES") 530 { 531 my $full_file_name = Prepare(); |
531 my @urls = ParseExtensionsLst($full_file_name, []); | 532 my $languages = [ "en_US" ]; 533 if (defined $ENV{'WITH_LANG'}) 534 { 535 @$languages = split(/\s+/, $ENV{'WITH_LANG'}); 536 foreach my $l (@$languages) 537 { 538 print "$l\n"; 539 } 540 } 541 my @urls = ParseExtensionsLst($full_file_name, $languages); |
532 Download(@urls); 533 } 534 else 535 { 536 print "bundling of dictionaries is disabled.\n"; 537 } 538} 539 --- 48 unchanged lines hidden --- | 542 Download(@urls); 543 } 544 else 545 { 546 print "bundling of dictionaries is disabled.\n"; 547 } 548} 549 --- 48 unchanged lines hidden --- |