|
Lines 19-25
use Modern::Perl;
Link Here
|
| 19 |
use JSON qw( decode_json encode_json ); |
19 |
use JSON qw( decode_json encode_json ); |
| 20 |
|
20 |
|
| 21 |
use C4::MarcModificationTemplates qw( ModifyRecordWithTemplate ); |
21 |
use C4::MarcModificationTemplates qw( ModifyRecordWithTemplate ); |
| 22 |
use C4::AuthoritiesMarc; |
22 |
use C4::AuthoritiesMarc qw( ModAuthority ); |
| 23 |
use Koha::BackgroundJobs; |
23 |
use Koha::BackgroundJobs; |
| 24 |
use Koha::DateUtils qw( dt_from_string ); |
24 |
use Koha::DateUtils qw( dt_from_string ); |
| 25 |
use Koha::MetadataRecord::Authority; |
25 |
use Koha::MetadataRecord::Authority; |
| 26 |
- |
|
|