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

(-)a/misc/cronjobs/edi_cron.pl (-2 / +7 lines)
Lines 36-45 use Koha::EDI qw( process_quote process_invoice process_ordrsp ); Link Here
36
use Koha::Edifact::Transport;
36
use Koha::Edifact::Transport;
37
use Koha::Logger;
37
use Koha::Logger;
38
use Koha::Plugins::Handler;
38
use Koha::Plugins::Handler;
39
use Fcntl qw( LOCK_EX O_CREAT O_RDWR SEEK_SET );
39
use Fcntl   qw( LOCK_EX O_CREAT O_RDWR SEEK_SET );
40
use C4::Log qw( cronlogaction );
40
41
41
die "Syspref 'EDIFACT' is disabled" unless C4::Context->preference('EDIFACT');
42
die "Syspref 'EDIFACT' is disabled" unless C4::Context->preference('EDIFACT');
42
43
44
my $command_line_options = join( " ", @ARGV );
45
cronlogaction( { info => $command_line_options } );
46
43
# we dont have a lock dir in context so use the logdir
47
# we dont have a lock dir in context so use the logdir
44
my $logdir  = C4::Context->config('logdir');
48
my $logdir  = C4::Context->config('logdir');
45
my $pidfile = "$logdir/edicron.pid";
49
my $pidfile = "$logdir/edicron.pid";
Lines 150-155 if ( close $pid_handle ) { Link Here
150
    exit 1;
154
    exit 1;
151
}
155
}
152
156
157
cronlogaction( { action => 'End', info => "COMPLETED" } );
158
153
sub check_pidfile {
159
sub check_pidfile {
154
160
155
    # sysopen my $fh, $pidfile, O_EXCL | O_RDWR or log_exit "$0 already running"
161
    # sysopen my $fh, $pidfile, O_EXCL | O_RDWR or log_exit "$0 already running"
156
- 

Return to bug 41851