$request->execute;
my ($systempreference) = $request->fetchrow;
$systempreference = '' unless defined $systempreference; # avoid warning
+ # Make sure the global sysprefs.sql file is loaded first
+ my $globalsysprefs = C4::Context->config('intranetdir') . "/installer/data/$self->{dbms}/sysprefs.sql";
+ unshift(@fnames, $globalsysprefs);
foreach my $file (@fnames) {
# warn $file;
undef $/;
# report the import a failure although it really succeded -fbcit
}
# errors thrown while loading installer data should be logged
- warn "C4::Installer::load_sql returned the following errors while attempting to load $filename:\n";
- warn $error;
+ if($error) {
+ warn "C4::Installer::load_sql returned the following errors while attempting to load $filename:\n";
+ warn "$error";
+ }
return $error;
}