instsetoo_native/inc_openoffice/windows/msi_templates/_Validat.idt |    4 
 solenv/bin/modules/installer.pm                                    |    2 
 solenv/bin/modules/installer/windows/msishortcutproperty.pm        |   45 
++++------
 3 files changed, 25 insertions(+), 26 deletions(-)

New commits:
commit 7137605eefb6b4efe80c89c4468e33591b1e474f
Author: Fridrich Å trba <fridrich.st...@bluewin.ch>
Date:   Wed Jul 24 16:29:56 2013 +0200

    Some more fixups towards the MsiShortcutProperty table
    
    Change-Id: I961a2c05c175512ee1fb4b0f11d0da1d5eae1c71

diff --git a/instsetoo_native/inc_openoffice/windows/msi_templates/_Validat.idt 
b/instsetoo_native/inc_openoffice/windows/msi_templates/_Validat.idt
index 193873a..c5945ae 100644
--- a/instsetoo_native/inc_openoffice/windows/msi_templates/_Validat.idt
+++ b/instsetoo_native/inc_openoffice/windows/msi_templates/_Validat.idt
@@ -296,6 +296,10 @@ MsiFileHash        HashPart2       N                       
                                Size of file in bytes (long integer).
 MsiFileHash    HashPart3       N                                               
        Size of file in bytes (long integer).
 MsiFileHash    HashPart4       N                                               
        Size of file in bytes (long integer).
 MsiFileHash    Options N       0       32767                                   
Various options and attributes for this hash.
+MsiShortcutProperty    MsiShortcutProperty     N                               
        Identifier              Unique identifier for this row of the 
MsiShortcutProperty table
+MsiShortcutProperty    Shortcut_       N                                       
Identifier              A key into the Shortcut table that identifies the 
shortcut having a property set
+MsiShortcutProperty    PropertyKey     N                                       
Formatted               A string value that provides information for the 
PROPERTYKEY structure
+MsiShortcutProperty    PropVariantValue        N                               
        Formatted               A string value that provides information for 
the PROPVARIANT structure.
 ODBCAttribute  Attribute       N                                       Text    
        Name of ODBC driver attribute
 ODBCAttribute  Driver_ N                       ODBCDriver      1       
Identifier              Reference to ODBC driver in ODBCDriver table
 ODBCAttribute  Value   Y                                       Text            
Value for ODBC driver attribute
diff --git a/solenv/bin/modules/installer.pm b/solenv/bin/modules/installer.pm
index 76ba410..76884c3 100644
--- a/solenv/bin/modules/installer.pm
+++ b/solenv/bin/modules/installer.pm
@@ -1392,7 +1392,7 @@ sub run {
 
             installer::windows::upgrade::create_upgrade_table($newidtdir, 
$allvariableshashref);
 
-            
installer::windows::msishortcutproperty::create_msishortcutproperty_table($folderitempropertiesinproductlanguageresolvedarrayref,
 $folderitemsinproductlanguageresolvedarrayref, $newidtdir);
+            
installer::windows::msishortcutproperty::create_msishortcutproperty_table($folderitempropertiesinproductarrayref,
 $folderitemsinproductlanguageresolvedarrayref, $newidtdir);
 
             if (( ! $installer::globals::languagepack ) && ( ! 
$installer::globals::helppack )) # the following tables not for language packs 
or help packs
             {
diff --git a/solenv/bin/modules/installer/windows/msishortcutproperty.pm 
b/solenv/bin/modules/installer/windows/msishortcutproperty.pm
index d15cb46..019adbd 100644
--- a/solenv/bin/modules/installer/windows/msishortcutproperty.pm
+++ b/solenv/bin/modules/installer/windows/msishortcutproperty.pm
@@ -109,39 +109,34 @@ sub create_msishortcutproperty_table
 {
     my ($folderitempropertiesref, $folderitemsref, $basedir) = @_;
 
-    for ( my $m = 0; $m <= $#{$languagesarrayref}; $m++ )
-    {
-        my @msishortcutpropertytable = ();
-
-        
installer::windows::idtglobal::write_idt_header(\@msishortcutpropertytable, 
"msishortcutproperty");
+    my @msishortcutpropertytable = ();
 
-        # The entries defined in scp as FolderItemProperties
-        # These shortcuts will fill the icons table.
+    
installer::windows::idtglobal::write_idt_header(\@msishortcutpropertytable, 
"msishortcutproperty");
 
-        for ( my $j = 0; $j <= $#{$folderitempropertiesref}; $j++ )
-        {
-            my $onelink = ${$folderitempropertiesref}[$j];
+    # The entries defined in scp as FolderItemProperties
 
-            my %msishortcutproperty = ();
+    for ( my $j = 0; $j <= $#{$folderitempropertiesref}; $j++ )
+    {
+        my $onelink = ${$folderitempropertiesref}[$j];
+        my %msishortcutproperty = ();
 
-            $msishortcutproperty{'MsiShortcutProperty'} = 
get_msishortcutproperty_identifier($onelink);
-            $msishortcutproperty{'Shortcut_'} = 
get_msishorcutproperty_shortcut($onelink, $folderitemsref);
-            $msishortcutproperty{'PropertyKey'} = 
get_msishortcutproperty_propertykey($onelink);
-            $msishortcutproperty{'PropVariantValue'} = 
get_msishortcutproperty_propvariantvalue($onelink);
+        $msishortcutproperty{'MsiShortcutProperty'} = 
get_msishortcutproperty_identifier($onelink);
+        $msishortcutproperty{'Shortcut_'} = 
get_msishorcutproperty_shortcut($onelink, $folderitemsref);
+        $msishortcutproperty{'PropertyKey'} = 
get_msishortcutproperty_propertykey($onelink);
+        $msishortcutproperty{'PropVariantValue'} = 
get_msishortcutproperty_propvariantvalue($onelink);
 
-            my $oneline = $msishortcutproperty{'MsiShortcutProperty'} . "\t" . 
$msishortcutproperty{'Shortcut_'} . "\t"
-                        . $msishortcutproperty{'PropertyKey'} . "\t" . 
$msishortcutproperty{'PropVariantValue'} . "\n";
+        my $oneline = $msishortcutproperty{'MsiShortcutProperty'} . "\t" . 
$msishortcutproperty{'Shortcut_'} . "\t"
+                    . $msishortcutproperty{'PropertyKey'} . "\t" . 
$msishortcutproperty{'PropVariantValue'} . "\n";
 
-            push(@msishortcutpropertytable, $oneline);
-        }
+        push(@msishortcutpropertytable, $oneline);
+    }
 
-        # Saving the file
+    # Saving the file
 
-        my $msishortcutpropertytablename = $basedir . 
$installer::globals::separator . "MsiShortcutProperty.idt" . "." . $onelanguage;
-        installer::files::save_file($msishortcutpropertytablename 
,\@msishortcutpropertytable);
-        my $infoline = "Created idt file: $msishortcutpropertytablename\n";
-        push(@installer::globals::logfileinfo, $infoline);
-    }
+    my $msishortcutpropertytablename = $basedir . 
$installer::globals::separator . "MsiShorP.idt";
+    installer::files::save_file($msishortcutpropertytablename 
,\@msishortcutpropertytable);
+    my $infoline = "Created idt file: $msishortcutpropertytablename\n";
+    push(@installer::globals::logfileinfo, $infoline);
 }
 
 
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits

Reply via email to