make_installer.pl (f30bf281) | make_installer.pl (01a01bd6) |
---|---|
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 --- 598 unchanged lines hidden (view full) --- 607 608############################################################################### 609# Beginning of language dependent part 610# The for iterates over all products, separated by an # in the language list 611############################################################################### 612 613if ( $installer::globals::debug ) { installer::logger::debuginfo("\nPart 1b: The language dependent part\n"); } 614 | 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 --- 598 unchanged lines hidden (view full) --- 607 608############################################################################### 609# Beginning of language dependent part 610# The for iterates over all products, separated by an # in the language list 611############################################################################### 612 613if ( $installer::globals::debug ) { installer::logger::debuginfo("\nPart 1b: The language dependent part\n"); } 614 |
615 616for ( my $n = 0; $n <= $#installer::globals::languageproducts; $n++ ) | 615# Run the following code block exactly once. 616# This strange version of a do{}while(false) loop exists only to allow (legacy) next statements. 617for (;1;last) |
617{ | 618{ |
618 my $languagesarrayref = installer::languages::get_all_languages_for_one_product($installer::globals::languageproducts[$n], $allvariableshashref); | 619 my $languagesarrayref = installer::languages::get_all_languages_for_one_product($installer::globals::languageproduct, $allvariableshashref); |
619 if ( $installer::globals::globallogging ) { installer::files::save_file($loggingdir . "languages.log" ,$languagesarrayref); } 620 621 $installer::globals::alllanguagesinproductarrayref = $languagesarrayref; 622 my $languagestringref = installer::languages::get_language_string($languagesarrayref); 623 $installer::logger::Info->print( "------------------------------------\n" ); 624 $installer::logger::Info->print( "... languages $$languagestringref ... \n" ); 625 626 if ( $installer::globals::patch ) --- 1627 unchanged lines hidden (view full) --- 2254 2255 } # end of "if ( $installer::globals::iswindowsbuild )" 2256 2257 if ( $installer::globals::debug ) { installer::logger::debuginfo("\nEnd of part 2b: The Windows platform\n"); } 2258 2259 # saving file_info file for later analysis 2260 my $speciallogfilename = "fileinfo_" . $installer::globals::product . "\.log"; 2261 installer::files::save_array_of_hashes($loggingdir . $speciallogfilename, $filesinproductlanguageresolvedarrayref); | 620 if ( $installer::globals::globallogging ) { installer::files::save_file($loggingdir . "languages.log" ,$languagesarrayref); } 621 622 $installer::globals::alllanguagesinproductarrayref = $languagesarrayref; 623 my $languagestringref = installer::languages::get_language_string($languagesarrayref); 624 $installer::logger::Info->print( "------------------------------------\n" ); 625 $installer::logger::Info->print( "... languages $$languagestringref ... \n" ); 626 627 if ( $installer::globals::patch ) --- 1627 unchanged lines hidden (view full) --- 2255 2256 } # end of "if ( $installer::globals::iswindowsbuild )" 2257 2258 if ( $installer::globals::debug ) { installer::logger::debuginfo("\nEnd of part 2b: The Windows platform\n"); } 2259 2260 # saving file_info file for later analysis 2261 my $speciallogfilename = "fileinfo_" . $installer::globals::product . "\.log"; 2262 installer::files::save_array_of_hashes($loggingdir . $speciallogfilename, $filesinproductlanguageresolvedarrayref); |
2263} |
|
2262 | 2264 |
2263} # end of iteration for one language group 2264 | |
2265# saving debug info at end 2266if ( $installer::globals::debug ) { installer::logger::savedebug($installer::globals::exitlog); } 2267 2268####################################################### 2269# Stopping time 2270####################################################### 2271 2272installer::logger::stoptime(); 2273 2274#################################### 2275# Main program end 2276#################################### | 2265# saving debug info at end 2266if ( $installer::globals::debug ) { installer::logger::savedebug($installer::globals::exitlog); } 2267 2268####################################################### 2269# Stopping time 2270####################################################### 2271 2272installer::logger::stoptime(); 2273 2274#################################### 2275# Main program end 2276#################################### |