INTEGRATION: CWS native155 (1.25.10); FILE MERGED

2008/05/26 10:56:59 is 1.25.10.1: #i89911# basis-link in admin installations

solenv/bin/modules/installer/windows/property.pm

@@ -8,7 +8,7 @@
 #
 # $RCSfile: property.pm,v $
 #
-# $Revision: 1.25 $
+# $Revision: 1.26 $
 #
 # This file is part of OpenOffice.org.
 #
@@ -269,6 +269,12 @@ sub set_important_properties
         push(@{$propertyfile}, $onepropertyline);
     }
 
+    if ( $allvariables->{'BASISROOTNAME'} )
+    {
+        my $onepropertyline = "BASISROOTNAME" . "\t" . $allvariables->{'BASISROOTNAME'} . "\n";
+        push(@{$propertyfile}, $onepropertyline);
+    }
+
     if ( $installer::globals::sundirexists )
     {
         my $onepropertyline = "SUNDIREXISTS" . "\t" . "1" . "\n";