|
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 |
- |
|
|