diff options
| author | Tim Retout <tim@retout.co.uk> | 2012-02-17 23:01:27 +0000 |
|---|---|---|
| committer | Michael Meeks <michael.meeks@suse.com> | 2012-02-18 09:40:56 +0000 |
| commit | 26f3aaa28c03baa898030cb894f9a3ad7f1cb10d (patch) | |
| tree | ff5c3f93f22b09e0696a33d2e081443d2b8fb1e9 /solenv/bin/modules/installer/profiles.pm | |
| parent | fcac6ce7319af1006f65fcf2e84243c7c93458a4 (diff) | |
Remove installer::existence::get_specified_file.
Diffstat (limited to 'solenv/bin/modules/installer/profiles.pm')
| -rw-r--r-- | solenv/bin/modules/installer/profiles.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/solenv/bin/modules/installer/profiles.pm b/solenv/bin/modules/installer/profiles.pm index 22e18e69344d..156796e4dbf2 100644 --- a/solenv/bin/modules/installer/profiles.pm +++ b/solenv/bin/modules/installer/profiles.pm @@ -97,7 +97,10 @@ sub add_profile_into_filelist my $vclgid = "gid_File_Lib_Vcl"; if ( $allvariables->{'GLOBALFILEGID'} ) { $vclgid = $allvariables->{'GLOBALFILEGID'}; } - my $vclfile = installer::existence::get_specified_file($filesarrayref, $vclgid); + my ($vclfile) = grep {$_->{gid} eq $vclgid} @{$filesarrayref}; + if (! defined $vclfile) { + installer::exiter::exit_program("ERROR: Could not find file $vclgid in list of files!", "add_profile_into_filelist"); + } # copying all base data installer::converter::copy_item_object($vclfile, \%profile); |