Lines 24-34
use Try::Tiny qw( catch try );
Link Here
|
24 |
use C4::Context; |
24 |
use C4::Context; |
25 |
use Koha::DateUtils qw( dt_from_string ); |
25 |
use Koha::DateUtils qw( dt_from_string ); |
26 |
use Koha::Exceptions; |
26 |
use Koha::Exceptions; |
27 |
use Koha::BackgroundJob::BatchUpdateBiblio; |
|
|
28 |
use Koha::BackgroundJob::BatchUpdateAuthority; |
29 |
use Koha::BackgroundJob::BatchDeleteBiblio; |
30 |
use Koha::BackgroundJob::BatchDeleteAuthority; |
31 |
use Koha::BackgroundJob::BatchCancelHold; |
32 |
|
27 |
|
33 |
use base qw( Koha::Object ); |
28 |
use base qw( Koha::Object ); |
34 |
|
29 |
|
Lines 243-248
sub _derived_class {
Link Here
|
243 |
Koha::Exceptions::Exception->throw($job_type . ' is not a valid job_type') |
238 |
Koha::Exceptions::Exception->throw($job_type . ' is not a valid job_type') |
244 |
unless $class; |
239 |
unless $class; |
245 |
|
240 |
|
|
|
241 |
eval "require $class"; |
246 |
return $class->new; |
242 |
return $class->new; |
247 |
} |
243 |
} |
248 |
|
244 |
|
249 |
- |
|
|