installer: Remove unused -tab command-line option and TAB_ONLY flag.
Change-Id: Idcb8be8882db8f487ba9bda2ae8947ccd9d99712 Reviewed-on: https://gerrit.libreoffice.org/462 Reviewed-by: Thomas Arnhold <thomas@arnhold.org> Tested-by: Thomas Arnhold <thomas@arnhold.org>
This commit is contained in:
committed by
Thomas Arnhold
parent
56dde463a1
commit
dd7ddfc34e
@@ -290,7 +290,6 @@ End
|
||||
|
||||
Module gid_Module_Root_Files_5
|
||||
PackageInfo = "packinfo_office.txt";
|
||||
TabPackageInfo = "packinfo_office_tab.txt";
|
||||
ParentID = gid_Module_Root;
|
||||
InstallOrder = "40";
|
||||
Name = "gid_Module_Root_Files_5";
|
||||
|
@@ -30,7 +30,6 @@
|
||||
Module gid_Module_Root
|
||||
Sortkey = "10";
|
||||
PackageInfo = "packinfo_office.txt";
|
||||
TabPackageInfo = "packinfo_office_tab.txt";
|
||||
InstallOrder = "20";
|
||||
MOD_NAME_DESC(MODULE_ROOT_OSL);
|
||||
XpdPackageName = "gid_Module_Root_Files_1";
|
||||
|
@@ -398,11 +398,6 @@ sub main {
|
||||
$filesinproductarrayref = installer::scriptitems::remove_patchonlyfiles_from_Installset($filesinproductarrayref);
|
||||
}
|
||||
|
||||
if (! $installer::globals::tab)
|
||||
{
|
||||
$filesinproductarrayref = installer::scriptitems::remove_tabonlyfiles_from_Installset($filesinproductarrayref);
|
||||
}
|
||||
|
||||
installer::logger::print_message( "... analyzing scpactions ... \n" );
|
||||
|
||||
my $scpactionsinproductarrayref = installer::setupscript::get_all_items_from_script($setupscriptref, "ScpAction");
|
||||
|
@@ -265,7 +265,6 @@ BEGIN
|
||||
$addchildprojects = 0;
|
||||
$languagepack = 0;
|
||||
$helppack = 0;
|
||||
$tab = 0;
|
||||
$patch = 0;
|
||||
$patchincludepath = "";
|
||||
$refresh_includepaths = 0;
|
||||
|
@@ -634,10 +634,7 @@ sub collectpackages
|
||||
my $onemodule;
|
||||
foreach $onemodule ( @{$allmodules} )
|
||||
{
|
||||
my $packageinfo = "PackageInfo";
|
||||
if (( $installer::globals::tab ) && ( $onemodule->{"TabPackageInfo"} )) { $packageinfo = "TabPackageInfo" }
|
||||
|
||||
if ( $onemodule->{$packageinfo} ) # this is a package module!
|
||||
if ( $onemodule->{'PackageInfo'} ) # this is a package module!
|
||||
{
|
||||
my $modulegid = $onemodule->{'gid'};
|
||||
|
||||
@@ -658,7 +655,7 @@ sub collectpackages
|
||||
if ( exists($gid_analyzed{$modulegid}) ) { next; }
|
||||
$gid_analyzed{$modulegid} = 1;
|
||||
|
||||
my $packinfofile = $onemodule->{$packageinfo};
|
||||
my $packinfofile = $onemodule->{'PackageInfo'};
|
||||
|
||||
# The file with package information has to be found in path list
|
||||
my $fileref = installer::scriptitems::get_sourcepath_from_filename_and_includepath(\$packinfofile, "" , 0);
|
||||
|
@@ -133,7 +133,6 @@ sub getparameter
|
||||
elsif ($param eq "-format") { $installer::globals::packageformat = shift(@ARGV); }
|
||||
elsif ($param eq "-quiet") { $installer::globals::quiet = 1; }
|
||||
elsif ($param eq "-verbose") { $installer::globals::quiet = 0; }
|
||||
elsif ($param eq "-tab") { $installer::globals::tab = 1; }
|
||||
elsif ($param eq "-u") { $installer::globals::unpackpath = shift(@ARGV); }
|
||||
elsif ($param eq "-i") { $installer::globals::rootpath = shift(@ARGV); }
|
||||
elsif ($param eq "-dontcallepm") { $installer::globals::call_epm = 0; }
|
||||
@@ -564,7 +563,6 @@ sub outputparameter
|
||||
if ((!($installer::globals::iswindowsbuild)) && ( $installer::globals::call_epm )) { push(@output, "Calling epm\n"); }
|
||||
if ((!($installer::globals::iswindowsbuild)) && (!($installer::globals::call_epm))) { push(@output, "Not calling epm\n"); }
|
||||
if ( $installer::globals::patchincludepath ) { push(@output, "Patch include path: $installer::globals::patchincludepath\n"); }
|
||||
if ( $installer::globals::tab ) { push(@output, "TAB version\n"); }
|
||||
if ( $installer::globals::strip ) { push(@output, "Stripping files\n"); }
|
||||
else { push(@output, "No file stripping\n"); }
|
||||
if ( $installer::globals::debian ) { push(@output, "Linux: Creating Debian packages\n"); }
|
||||
|
@@ -1651,42 +1651,6 @@ sub remove_patchonlyfiles_from_Installset
|
||||
return \@newitemsarray;
|
||||
}
|
||||
|
||||
############################################################################
|
||||
# Removing all files with flag TAB_ONLY from installation set.
|
||||
# This function is not called during tab creation.
|
||||
############################################################################
|
||||
|
||||
sub remove_tabonlyfiles_from_Installset
|
||||
{
|
||||
my ($itemsarrayref) = @_;
|
||||
|
||||
my $infoline;
|
||||
|
||||
my @newitemsarray = ();
|
||||
|
||||
for ( my $i = 0; $i <= $#{$itemsarrayref}; $i++ )
|
||||
{
|
||||
my $oneitem = ${$itemsarrayref}[$i];
|
||||
my $styles = "";
|
||||
if ( $oneitem->{'Styles'} ) { $styles = $oneitem->{'Styles'}; }
|
||||
|
||||
if ( $styles =~ /\bTAB_ONLY\b/ )
|
||||
{
|
||||
$infoline = "Removing tab only file $oneitem->{'gid'} from the installation set.\n";
|
||||
push( @installer::globals::globallogfileinfo, $infoline);
|
||||
|
||||
next;
|
||||
}
|
||||
|
||||
push(@newitemsarray, $oneitem);
|
||||
}
|
||||
|
||||
$infoline = "\n";
|
||||
push( @installer::globals::globallogfileinfo, $infoline);
|
||||
|
||||
return \@newitemsarray;
|
||||
}
|
||||
|
||||
############################################################################
|
||||
# Some files cotain a $ in their name. epm conflicts with such files.
|
||||
# Solution: Renaming this files, converting "$" to "$$"
|
||||
|
Reference in New Issue
Block a user