diff options
author | Thomas Arnhold <thomas@arnhold.org> | 2012-08-14 23:30:56 +0200 |
---|---|---|
committer | Tim Retout <tim@retout.co.uk> | 2012-08-15 08:45:37 +0100 |
commit | fe9f8c1800d8729fd1f07039c952f95ecefb560c (patch) | |
tree | c020a950e3fc464f771fc06fedeb538c78b6e324 /solenv/bin/modules/installer/windows/shortcut.pm | |
parent | ab03e87741f25d3a5532a75c3dc59b5556a2bb24 (diff) |
solenv: remove unused functions
Change-Id: I8e361beb954c742ddcecde4a4ba2a4ae57057c39
Diffstat (limited to 'solenv/bin/modules/installer/windows/shortcut.pm')
-rw-r--r-- | solenv/bin/modules/installer/windows/shortcut.pm | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/solenv/bin/modules/installer/windows/shortcut.pm b/solenv/bin/modules/installer/windows/shortcut.pm index 4b7ff36f2e10..966c4aa0aa7f 100644 --- a/solenv/bin/modules/installer/windows/shortcut.pm +++ b/solenv/bin/modules/installer/windows/shortcut.pm @@ -33,34 +33,6 @@ use installer::globals; use installer::windows::idtglobal; ############################################################## -# Returning the file object for the msiassembly table. -############################################################## - -sub get_file_by_name -{ - my ( $filesref, $filename ) = @_; - - my $foundfile = 0; - my $onefile; - - for ( my $i = 0; $i <= $#{$filesref}; $i++ ) - { - $onefile = ${$filesref}[$i]; - my $name = $onefile->{'Name'}; - - if ( $name eq $filename ) - { - $foundfile = 1; - last; - } - } - - if (! $foundfile ) { $onefile = ""; } - - return $onefile; -} - -############################################################## # Returning identifier for shortcut table. ############################################################## |