Martin Renvoize
d2e189ca1c
This patch change Koha::Cron to be a more generic Koha::Script class and update all commanline driven scripts to use it. Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> Signed-off-by: Josef Moravec <josef.moravec@gmail.com> Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io> Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
25 lines
587 B
Perl
Executable file
25 lines
587 B
Perl
Executable file
#!/usr/bin/perl
|
|
#-----------------------------------
|
|
# Script Name: build_holds_queue.pl
|
|
# Description: builds a holds queue in the tmp_holdsqueue table
|
|
#-----------------------------------
|
|
# FIXME: add command-line options for verbosity and summary
|
|
# FIXME: expand perldoc, explain intended logic
|
|
|
|
use strict;
|
|
use warnings;
|
|
BEGIN {
|
|
# find Koha's Perl modules
|
|
# test carefully before changing this
|
|
use FindBin;
|
|
eval { require "$FindBin::Bin/../kohalib.pl" };
|
|
}
|
|
|
|
use Koha::Script -cron;
|
|
use C4::HoldsQueue qw(CreateQueue);
|
|
use C4::Log;
|
|
|
|
cronlogaction();
|
|
|
|
CreateQueue();
|
|
|