scriptitems.pm (e9da2d53) scriptitems.pm (9f8f7bfb)
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

--- 971 unchanged lines hidden (view full) ---

980 installer::languages::fake_languagesstring(\$languagesstring);
981
982 my $productname = $hashref->{'PRODUCTNAME'};
983 my $productversion = $hashref->{'PRODUCTVERSION'};
984 my $userdirproductversion = "";
985 if ( $hashref->{'USERDIRPRODUCTVERSION'} ) { $userdirproductversion = $hashref->{'USERDIRPRODUCTVERSION'}; }
986 my $productkey = $productname . " " . $productversion;
987
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

--- 971 unchanged lines hidden (view full) ---

980 installer::languages::fake_languagesstring(\$languagesstring);
981
982 my $productname = $hashref->{'PRODUCTNAME'};
983 my $productversion = $hashref->{'PRODUCTVERSION'};
984 my $userdirproductversion = "";
985 if ( $hashref->{'USERDIRPRODUCTVERSION'} ) { $userdirproductversion = $hashref->{'USERDIRPRODUCTVERSION'}; }
986 my $productkey = $productname . " " . $productversion;
987
988 my $scsrevision = SvnRevision::DetectRevisionId(File::Spec->catfile($ENV{'SRC_ROOT'}, File::Spec->updir()));
988 my $scsrevision;
989 $scsrevision = "" unless ( $scsrevision = SvnRevision::DetectRevisionId(File::Spec->catfile($ENV{'SRC_ROOT'}, File::Spec->updir())) );
989
990 # string $buildid, which is used to replace the setup variable <buildid>
991
992 my $localminor = "flat";
993 if ( $installer::globals::minor ne "" ) { $localminor = $installer::globals::minor; }
994 else { $localminor = $installer::globals::lastminor; }
995
996 my $localbuild = $installer::globals::build;

--- 12 unchanged lines hidden (view full) ---

1009 $updateid =~ s/ /_/g;
1010
1011 for ( my $i = 0; $i <= $#{$itemsarrayref}; $i++ )
1012 {
1013 my $oneitem = ${$itemsarrayref}[$i];
1014 my $value = $oneitem->{'Value'};
1015
1016 $value =~ s/\<buildid\>/$buildidstring/;
990
991 # string $buildid, which is used to replace the setup variable <buildid>
992
993 my $localminor = "flat";
994 if ( $installer::globals::minor ne "" ) { $localminor = $installer::globals::minor; }
995 else { $localminor = $installer::globals::lastminor; }
996
997 my $localbuild = $installer::globals::build;

--- 12 unchanged lines hidden (view full) ---

1010 $updateid =~ s/ /_/g;
1011
1012 for ( my $i = 0; $i <= $#{$itemsarrayref}; $i++ )
1013 {
1014 my $oneitem = ${$itemsarrayref}[$i];
1015 my $value = $oneitem->{'Value'};
1016
1017 $value =~ s/\<buildid\>/$buildidstring/;
1017 $value =~ s/\<scsrevision\>/$scsrevision/ if defined $scsrevision;
1018 $value =~ s/\<scsrevision\>/$scsrevision/;
1018 $value =~ s/\<sequence_languages\>/$languagesstring/;
1019 $value =~ s/\<productkey\>/$productkey/;
1020 $value =~ s/\<productcode\>/$installer::globals::productcode/;
1021 $value =~ s/\<upgradecode\>/$installer::globals::upgradecode/;
1022 $value =~ s/\<alllanguages\>/$languagesstring/;
1023 $value =~ s/\<productmajor\>/$localbuild/;
1024 $value =~ s/\<productminor\>/$localminor/;
1025 $value =~ s/\<productbuildid\>/$installer::globals::buildid/;

--- 2115 unchanged lines hidden --- 		1019 $value =~ s/\<sequence_languages\>/$languagesstring/;
1020 $value =~ s/\<productkey\>/$productkey/;
1021 $value =~ s/\<productcode\>/$installer::globals::productcode/;
1022 $value =~ s/\<upgradecode\>/$installer::globals::upgradecode/;
1023 $value =~ s/\<alllanguages\>/$languagesstring/;
1024 $value =~ s/\<productmajor\>/$localbuild/;
1025 $value =~ s/\<productminor\>/$localminor/;
1026 $value =~ s/\<productbuildid\>/$installer::globals::buildid/;

--- 2115 unchanged lines hidden ---