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

(-)a/etc/log4perl.conf (+8 lines)
Lines 14-19 log4perl.appender.OPAC.layout=PatternLayout Link Here
14
log4perl.appender.OPAC.layout.ConversionPattern=[%d] [%p] %m %l%n
14
log4perl.appender.OPAC.layout.ConversionPattern=[%d] [%p] %m %l%n
15
log4perl.appender.OPAC.utf8=1
15
log4perl.appender.OPAC.utf8=1
16
16
17
log4perl.logger.worker = WARN, WORKER
18
log4perl.appender.WORKER=Log::Log4perl::Appender::File
19
log4perl.appender.WORKER.filename=__LOG_DIR__/worker-error.log
20
log4perl.appender.WORKER.mode=append
21
log4perl.appender.WORKER.layout=PatternLayout
22
log4perl.appender.WORKER.layout.ConversionPattern=[%d] [%p] %m %l%n
23
log4perl.appender.WORKER.utf8=1
24
17
log4perl.logger.z3950 = WARN, Z3950
25
log4perl.logger.z3950 = WARN, Z3950
18
log4perl.appender.Z3950=Log::Log4perl::Appender::File
26
log4perl.appender.Z3950=Log::Log4perl::Appender::File
19
log4perl.appender.Z3950.filename=__LOG_DIR__/z3950-error.log
27
log4perl.appender.Z3950.filename=__LOG_DIR__/z3950-error.log
(-)a/misc/background_jobs_worker.pl (-3 / +2 lines)
Lines 94-100 while (1) { Link Here
94
            my $body = $frame->body;
94
            my $body = $frame->body;
95
            decode_json($body); # TODO Should this be from_json? Check utf8 flag.
95
            decode_json($body); # TODO Should this be from_json? Check utf8 flag.
96
        } catch {
96
        } catch {
97
            Koha::Logger->get->warn(sprintf "Frame not processed - %s", $_);
97
            Koha::Logger->get({ interface => 'worker', category => 'error' })->warn(sprintf "Frame not processed - %s", $_);
98
        } finally {
98
        } finally {
99
            $conn->ack( { frame => $frame } );
99
            $conn->ack( { frame => $frame } );
100
        };
100
        };
Lines 106-112 while (1) { Link Here
106
        my $job = Koha::BackgroundJobs->find($args->{job_id});
106
        my $job = Koha::BackgroundJobs->find($args->{job_id});
107
107
108
        unless ( $job ) {
108
        unless ( $job ) {
109
            Koha::Logger->get->warn(sprintf "No job found for id=%s", $args->{job_id});
109
            Koha::Logger->get({ interface => 'worker', category => 'error' })->warn(sprintf "No job found for id=%s", $args->{job_id});
110
            next;
110
            next;
111
        }
111
        }
112
112
113
- 

Return to bug 32612