diff options
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); |