summaryrefslogtreecommitdiff
path: root/solenv/bin/modules/installer/windows/msishortcutproperty.pm
diff options
context:
space:
mode:
Diffstat (limited to 'solenv/bin/modules/installer/windows/msishortcutproperty.pm')
-rw-r--r--solenv/bin/modules/installer/windows/msishortcutproperty.pm45
1 files changed, 20 insertions, 25 deletions
diff --git a/solenv/bin/modules/installer/windows/msishortcutproperty.pm b/solenv/bin/modules/installer/windows/msishortcutproperty.pm
index d15cb46af599..019adbd28253 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);
}