Lines 24-29
use C4::Biblio qw(
Link Here
|
24 |
LinkBibHeadingsToAuthorities |
24 |
LinkBibHeadingsToAuthorities |
25 |
ModBiblio |
25 |
ModBiblio |
26 |
); |
26 |
); |
|
|
27 |
use C4::Log qw( cronlogaction ); |
27 |
use Koha::Biblios; |
28 |
use Koha::Biblios; |
28 |
use Getopt::Long qw( GetOptions ); |
29 |
use Getopt::Long qw( GetOptions ); |
29 |
use Pod::Usage qw( pod2usage ); |
30 |
use Pod::Usage qw( pod2usage ); |
Lines 70-75
if ( not $result or $want_help ) {
Link Here
|
70 |
usage(); |
71 |
usage(); |
71 |
} |
72 |
} |
72 |
|
73 |
|
|
|
74 |
cronlogaction(); |
75 |
|
73 |
my $linker_module = |
76 |
my $linker_module = |
74 |
"C4::Linker::" . ( C4::Context->preference("LinkerModule") || 'Default' ); |
77 |
"C4::Linker::" . ( C4::Context->preference("LinkerModule") || 'Default' ); |
75 |
unless ( can_load( modules => { $linker_module => undef } ) ) { |
78 |
unless ( can_load( modules => { $linker_module => undef } ) ) { |