diff --git a/C4/Installer.pm b/C4/Installer.pm index 952b629051..e70b0142a3 100644 --- a/C4/Installer.pm +++ b/C4/Installer.pm @@ -30,6 +30,7 @@ use C4::Context; use Koha::Schema; use Koha; use Koha::Installer; +use Koha::Installer::Output qw ( say_failure ); use vars qw(@ISA @EXPORT); BEGIN { @@ -742,6 +743,7 @@ sub run_db_rev { ); } catch { + say_failure( $outfh, "ERROR: " . $_ ); $error = $_; }; diff --git a/installer/data/mysql/updatedatabase.pl b/installer/data/mysql/updatedatabase.pl index a491bcf022..f4f43a89c0 100755 --- a/installer/data/mysql/updatedatabase.pl +++ b/installer/data/mysql/updatedatabase.pl @@ -24302,7 +24302,7 @@ unless ( $ENV{HTTP_HOST} ) { # Is that correct? } for my $e ( @{ $report->{error} } ) { say Encode::encode_utf8(join "\n", @{$e->{output}}); - say_failure( undef, Encode::encode_utf8("ERROR - " . $e->{error}) ); + #say_failure( undef, Encode::encode_utf8("ERROR - " . $e->{error}) ); $error_code = 1; } @@ -24313,7 +24313,7 @@ unless ( $ENV{HTTP_HOST} ) { # Is that correct? } for my $e ( @{ $report->{error} } ) { say Encode::encode_utf8(join "\n", @{$e->{output}}); - say_failure( undef, Encode::encode_utf8("ERROR - " . $e->{error}) ); + #say_failure( undef, Encode::encode_utf8("ERROR - " . $e->{error}) ); $error_code = 1; } exit $error_code;