installer: stop using PROEXT
Remove "productextension" from installer. There is some "common" cruft here that needs more cleanup.. Change-Id: Ia4ef306009f0c4952792d096bb335f834b0f8262
This commit is contained in:
@@ -165,7 +165,7 @@ sub resolving_archive_flag
|
||||
my $iscommonfile = 0;
|
||||
my $sourcepath = $onefile->{'sourcepath'};
|
||||
|
||||
if ( $sourcepath =~ /\Q$installer::globals::separator\E\bcommon$installer::globals::productextension\Q$installer::globals::separator\E/ ) # /common/ or /common.pro/
|
||||
if ( $sourcepath =~ /\Q$installer::globals::separator\E\bcommon\Q$installer::globals::separator\E/ ) # /common/ or /common.pro/
|
||||
{
|
||||
$iscommonfile = 1;
|
||||
}
|
||||
|
@@ -308,8 +308,6 @@ sub check_logfile
|
||||
my $ignore_error = 0;
|
||||
my $make_error_to_warning = 0;
|
||||
|
||||
if (( ! $installer::globals::pro ) && ( $installer::globals::ignore_error_in_logfile )) { $ignore_error = 1; }
|
||||
|
||||
for ( my $i = 0; $i <= $#{$logfile}; $i++ )
|
||||
{
|
||||
my $line = ${$logfile}[$i];
|
||||
|
@@ -115,7 +115,7 @@ sub set_global_environment_variables
|
||||
|
||||
if ( $ENV{'LAST_MINOR'} ) { $installer::globals::lastminor = $ENV{'LAST_MINOR'}; }
|
||||
|
||||
if ( $ENV{'PROEXT'} ) { $installer::globals::pro = 1; }
|
||||
if ( $ENV{'ENABLE_DBGUTIL'} ) {} else { $installer::globals::pro = 1; }
|
||||
|
||||
if ( $ENV{'VERBOSE'} && ( (lc $ENV{'VERBOSE'}) eq "false" ) ) { $installer::globals::quiet = 1; }
|
||||
if ( $ENV{'PREPARE_WINPATCH'} ) { $installer::globals::prepare_winpatch = 1; }
|
||||
|
@@ -35,7 +35,6 @@ BEGIN
|
||||
$destdir = "";
|
||||
$rootpath = "";
|
||||
|
||||
$productextension = "";
|
||||
@languageproducts = ();
|
||||
$build = "";
|
||||
$minor = "";
|
||||
|
@@ -336,9 +336,6 @@ sub setglobalvariables
|
||||
|
||||
if ( ! $installer::globals::packageformat ) { $installer::globals::packageformat = "native"; }
|
||||
|
||||
# extension, if $installer::globals::pro is set
|
||||
if ($installer::globals::pro) { $installer::globals::productextension = ".pro"; }
|
||||
|
||||
# no languages defined as parameter
|
||||
if ($installer::globals::languagelist eq "") { $installer::globals::languages_defined_in_productlist = 1; }
|
||||
|
||||
@@ -390,7 +387,7 @@ sub setglobalvariables
|
||||
|
||||
if ( ! -d $installer::globals::temppath ) { installer::exiter::exit_program("ERROR: Failed to create directory $installer::globals::temppath ! Possible reason: Wrong privileges in directory $dirsave .", "setglobalvariables"); }
|
||||
|
||||
$installer::globals::temppath = $installer::globals::temppath . $installer::globals::separator . $installer::globals::compiler . $installer::globals::productextension;
|
||||
$installer::globals::temppath = $installer::globals::temppath . $installer::globals::separator . $installer::globals::compiler;
|
||||
installer::systemactions::create_directory($installer::globals::temppath);
|
||||
if ( $^O =~ /cygwin/i )
|
||||
{
|
||||
|
@@ -202,7 +202,7 @@ sub create_directories
|
||||
|
||||
if ($newdirectory eq "unzip" ) # special handling for common directory
|
||||
{
|
||||
$path = $path . ".." . $installer::globals::separator . "common" . $installer::globals::productextension . $installer::globals::separator;
|
||||
$path = $path . ".." . $installer::globals::separator . "common" . $installer::globals::separator;
|
||||
create_directory($path);
|
||||
|
||||
$path = $path . $newdirectory . $installer::globals::separator;
|
||||
|
@@ -185,14 +185,7 @@ sub analyze_settings_block
|
||||
|
||||
# Comment line in settings block begin with "#" or ";"
|
||||
|
||||
if ( $installer::globals::pro )
|
||||
{
|
||||
$compilerstring = $installer::globals::compiler . ".pro";
|
||||
}
|
||||
else
|
||||
{
|
||||
$compilerstring = $installer::globals::compiler;
|
||||
}
|
||||
$compilerstring = $installer::globals::compiler;
|
||||
|
||||
for ( my $i = 0; $i <= $#{$blockref}; $i++ )
|
||||
{
|
||||
|
@@ -75,7 +75,7 @@ sub create_directories
|
||||
|
||||
if ($directory eq "unzip" )
|
||||
{
|
||||
$path = $path . "common" . $par2script::globals::productextension . $par2script::globals::separator;
|
||||
$path = $path . "common" . $par2script::globals::separator;
|
||||
create_directory($path);
|
||||
|
||||
$path = $path . $directory . $par2script::globals::separator;
|
||||
@@ -83,7 +83,7 @@ sub create_directories
|
||||
}
|
||||
else
|
||||
{
|
||||
$path = $path . $par2script::globals::compiler . $par2script::globals::productextension . $par2script::globals::separator;
|
||||
$path = $path . $par2script::globals::compiler . $par2script::globals::separator;
|
||||
create_directory($path);
|
||||
|
||||
$path = $path . $par2script::globals::product . $par2script::globals::separator;
|
||||
|
@@ -98,7 +98,7 @@ sub create_directories
|
||||
|
||||
if ($directory eq "unzip" )
|
||||
{
|
||||
$path = $path . "common" . $pre2par::globals::productextension . $pre2par::globals::separator;
|
||||
$path = $path . "common" . $pre2par::globals::separator;
|
||||
create_directory($path);
|
||||
|
||||
$path = $path . $directory . $pre2par::globals::separator;
|
||||
@@ -106,7 +106,7 @@ sub create_directories
|
||||
}
|
||||
else
|
||||
{
|
||||
$path = $path . $pre2par::globals::compiler . $pre2par::globals::productextension . $pre2par::globals::separator;
|
||||
$path = $path . $pre2par::globals::compiler . $pre2par::globals::separator;
|
||||
create_directory($path);
|
||||
|
||||
$path = $path . $pre2par::globals::product . $pre2par::globals::separator;
|
||||
|
Reference in New Issue
Block a user