diff options
author | Tim Retout <tim@retout.co.uk> | 2012-02-17 22:00:53 +0000 |
---|---|---|
committer | Michael Meeks <michael.meeks@suse.com> | 2012-02-18 09:40:55 +0000 |
commit | 6e07845a00bceaf66e95b97ea964b7868eff80c0 (patch) | |
tree | 8a66b3c629e47f889dc6d88aa7fcb19ca3c7f6cf /solenv/bin/modules/installer/windows/shortcut.pm | |
parent | 94446db8dff61687ad6100b9fd03f2170be37919 (diff) |
Remove installer::existence::exists_in_array.
Diffstat (limited to 'solenv/bin/modules/installer/windows/shortcut.pm')
-rw-r--r-- | solenv/bin/modules/installer/windows/shortcut.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/solenv/bin/modules/installer/windows/shortcut.pm b/solenv/bin/modules/installer/windows/shortcut.pm index 6c73f773cb24..cef50205de6b 100644 --- a/solenv/bin/modules/installer/windows/shortcut.pm +++ b/solenv/bin/modules/installer/windows/shortcut.pm @@ -516,7 +516,7 @@ sub get_folderitem_icon my $sourcepath = $onefile->{'sourcepath'}; - if (! installer::existence::exists_in_array($sourcepath, $iconfilecollector)) + if (! grep {$_ eq $sourcepath} @{$iconfilecollector}) { push(@{$iconfilecollector}, $sourcepath); } @@ -674,7 +674,7 @@ sub create_shortcut_table if ($$sourcepathref eq "") { installer::exiter::exit_program("ERROR: Could not find $sofficefile as icon!", "create_shortcut_table"); } - if (! installer::existence::exists_in_array($$sourcepathref, $iconfilecollector)) + if (! grep {$_ eq $$sourcepathref} @{$iconfilecollector}) { unshift(@{$iconfilecollector}, $$sourcepathref); $installer::globals::sofficeiconadded = 1; |