Attachment #102844 for bug #23571

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




use Getopt::Long;
use Carp;
use File::Spec;
use Try::Tiny;

use Koha::Calendar;
use Koha::DateUtils;

    exit;
}

my $script_handler = Koha::Script->new({ script => $0 });

try {
    $script_handler->lock_exec;
}
catch {
    my $message = "Skipping execution of $0 ($_)";
    print STDERR $message
        if $verbose;
    cronlogaction( $message );
    exit;
};

cronlogaction();

my @borrower_fields =
- 

Return to bug 23571

Lines 36-41 use C4::Overdues; Link Here

(-)a/misc/cronjobs/fines.pl (-1 / +14 lines)
36	use Getopt::Long;	36	use Getopt::Long;
37	use Carp;	37	use Carp;
38	use File::Spec;	38	use File::Spec;
		39	use Try::Tiny;
39		40
40	use Koha::Calendar;	41	use Koha::Calendar;
41	use Koha::DateUtils;	42	use Koha::DateUtils;
Lines 76-81 if ($help) { Link Here
76	exit;	77	exit;
77	}	78	}
78		79
		80	my $script_handler = Koha::Script->new({ script => $0 });
		81
		82	try {
		83	$script_handler->lock_exec;
		84	}
		85	catch {
		86	my $message = "Skipping execution of $0 ($_)";
		87	print STDERR $message
		88	if $verbose;
		89	cronlogaction( $message );
		90	exit;
		91	};
		92
79	cronlogaction();	93	cronlogaction();
80		94
81	my @borrower_fields =	95	my @borrower_fields =
82	-