INTEGRATION: CWS native97 (1.3.20); FILE MERGED
2007/07/10 16:08:55 is 1.3.20.1: #i78658# checking solaris architecture
This commit is contained in:
parent
e00d487f3a
commit
80ea55e213
1 changed files with 22 additions and 2 deletions
|
@ -4,9 +4,9 @@
|
|||
#
|
||||
# $RCSfile: xpdinstaller.pm,v $
|
||||
#
|
||||
# $Revision: 1.3 $
|
||||
# $Revision: 1.4 $
|
||||
#
|
||||
# last change: $Author: rt $ $Date: 2007-07-03 11:46:38 $
|
||||
# last change: $Author: ihi $ $Date: 2007-07-12 11:16:47 $
|
||||
#
|
||||
# The Contents of this file are made available subject to
|
||||
# the terms of GNU Lesser General Public License Version 2.1.
|
||||
|
@ -754,6 +754,23 @@ sub set_packagetype_tag
|
|||
return $tag;
|
||||
}
|
||||
|
||||
###################################################
|
||||
# Setting the architecture of installation set
|
||||
###################################################
|
||||
|
||||
sub set_architecture_tag
|
||||
{
|
||||
my ($indent) = @_;
|
||||
|
||||
my $architecture = "";
|
||||
if ( $installer::globals::issolarissparcbuild ) { $architecture = "sparc"; }
|
||||
if ( $installer::globals::issolarisx86build ) { $architecture = "i386"; }
|
||||
|
||||
my $tag = $indent . "<architecture>" . $architecture . "</architecture>" . "\n";
|
||||
|
||||
return $tag;
|
||||
}
|
||||
|
||||
###################################################
|
||||
# Collecting content for product xpd file
|
||||
###################################################
|
||||
|
@ -804,6 +821,9 @@ sub get_setup_file_content
|
|||
$tag = set_packagetype_tag($singleindent);
|
||||
push(@xpdfile, $tag);
|
||||
|
||||
$tag = set_architecture_tag($singleindent);
|
||||
push(@xpdfile, $tag);
|
||||
|
||||
$tag = get_end_tag("product", $noindent);
|
||||
push(@xpdfile, $tag);
|
||||
|
||||
|
|
Loading…
Reference in a new issue