View | Details | Raw Unified | Return to bug 38299
Collapse All | Expand All

(-)a/installer/data/mysql/updatedatabase.pl (-3 / +3 lines)
Lines 42-47 use Koha::Database; Link Here
42
use Koha;
42
use Koha;
43
use Koha::DateUtils qw( dt_from_string output_pref );
43
use Koha::DateUtils qw( dt_from_string output_pref );
44
use Koha::Caches;
44
use Koha::Caches;
45
use Koha::Installer::Output qw ( say_failure );
45
46
46
use MARC::Record;
47
use MARC::Record;
47
use MARC::File::XML ( BinaryEncoding => 'utf8' );
48
use MARC::File::XML ( BinaryEncoding => 'utf8' );
Lines 24301-24307 unless ( $ENV{HTTP_HOST} ) { # Is that correct? Link Here
24301
    }
24302
    }
24302
    for my $e ( @{ $report->{error} } ) {
24303
    for my $e ( @{ $report->{error} } ) {
24303
        say Encode::encode_utf8(join "\n", @{$e->{output}});
24304
        say Encode::encode_utf8(join "\n", @{$e->{output}});
24304
        say Encode::encode_utf8("ERROR - " . $e->{error});
24305
        say_failure( undef, Encode::encode_utf8("ERROR - " . $e->{error}) );
24305
        $error_code = 1;
24306
        $error_code = 1;
24306
    }
24307
    }
24307
24308
Lines 24312-24318 unless ( $ENV{HTTP_HOST} ) { # Is that correct? Link Here
24312
    }
24313
    }
24313
    for my $e ( @{ $report->{error} } ) {
24314
    for my $e ( @{ $report->{error} } ) {
24314
        say Encode::encode_utf8(join "\n", @{$e->{output}});
24315
        say Encode::encode_utf8(join "\n", @{$e->{output}});
24315
        say Encode::encode_utf8("ERROR - " . $e->{error});
24316
        say_failure( undef, Encode::encode_utf8("ERROR - " . $e->{error}) );
24316
        $error_code = 1;
24317
        $error_code = 1;
24317
    }
24318
    }
24318
    exit $error_code;
24319
    exit $error_code;
24319
- 

Return to bug 38299