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