@@ -, +, @@ Log in to opac Virew your reading history Make/view a list Search the catalog Look at an individual title If you don't have Baker and Taylor credentials, simply fudge them with bad data and enable --- opac/opac-detail.pl | 9 ++------- opac/opac-readingrecord.pl | 9 ++------- opac/opac-search.pl | 9 ++------- opac/opac-shelves.pl | 2 ++ opac/opac-user.pl | 9 ++------- 5 files changed, 10 insertions(+), 28 deletions(-) --- a/opac/opac-detail.pl +++ a/opac/opac-detail.pl @@ -34,6 +34,8 @@ use C4::Circulation; use C4::Tags qw(get_tags); use C4::XISBN qw(get_xisbns); use C4::External::Amazon; +use C4::External::BakerTaylor; +use C4::External::BakerTaylor qw(&image_url &link_url); use C4::External::Syndetics qw(get_syndetics_index get_syndetics_summary get_syndetics_toc get_syndetics_excerpt get_syndetics_reviews get_syndetics_anotes ); use C4::Members; use C4::XSLT; @@ -61,13 +63,6 @@ use Koha::Patrons; use Koha::Ratings; use Koha::Reviews; -BEGIN { - if (C4::Context->preference('BakerTaylorEnabled')) { - require C4::External::BakerTaylor; - import C4::External::BakerTaylor qw(&image_url &link_url); - } -} - my $query = CGI->new(); my $biblionumber = $query->param('biblionumber') || $query->param('bib') || 0; --- a/opac/opac-readingrecord.pl +++ a/opac/opac-readingrecord.pl @@ -25,6 +25,8 @@ use C4::Koha; use C4::Biblio; use C4::Circulation; use C4::Members; +use C4::External::BakerTaylor; +use C4::External::BakerTaylor qw(&image_url &link_url); use Koha::DateUtils; use MARC::Record; @@ -138,13 +140,6 @@ if (C4::Context->preference('BakerTaylorEnabled')) { ); } -BEGIN { - if (C4::Context->preference('BakerTaylorEnabled')) { - require C4::External::BakerTaylor; - import C4::External::BakerTaylor qw(&image_url &link_url); - } -} - for(qw(AmazonCoverImages GoogleJackets)) { # BakerTaylorEnabled handled above C4::Context->preference($_) or next; $template->param($_=>1); --- a/opac/opac-search.pl +++ a/opac/opac-search.pl @@ -51,6 +51,8 @@ use C4::Koha; use C4::Tags qw(get_tags); use C4::SocialData; use C4::External::OverDrive; +use C4::External::BakerTaylor; +use C4::External::BakerTaylor qw(&image_url &link_url); use Koha::CirculationRules; use Koha::Libraries; @@ -90,13 +92,6 @@ if ( $branch_group_limit ) { } } -BEGIN { - if (C4::Context->preference('BakerTaylorEnabled')) { - require C4::External::BakerTaylor; - import C4::External::BakerTaylor qw(&image_url &link_url); - } -} - my ($template,$borrowernumber,$cookie); # decide which template to use my $template_name; --- a/opac/opac-shelves.pl +++ a/opac/opac-shelves.pl @@ -22,6 +22,8 @@ use Modern::Perl; use CGI qw ( -utf8 ); use C4::Auth; use C4::Biblio; +use C4::External::BakerTaylor; +use C4::External::BakerTaylor qw(&image_url &link_url); use C4::Koha; use C4::Items; use C4::Members; --- a/opac/opac-user.pl +++ a/opac/opac-user.pl @@ -24,6 +24,8 @@ use CGI qw ( -utf8 ); use C4::Auth; use C4::Koha; use C4::Circulation; +use C4::External::BakerTaylor; +use C4::External::BakerTaylor qw(&image_url &link_url); use C4::Reserves; use C4::Members; use C4::Members::AttributeTypes; @@ -56,13 +58,6 @@ use Date::Calc qw( my $query = new CGI; -BEGIN { - if (C4::Context->preference('BakerTaylorEnabled')) { - require C4::External::BakerTaylor; - import C4::External::BakerTaylor qw(&image_url &link_url); - } -} - # CAS single logout handling # Will print header and exit C4::Context->preference('casAuthentication') and C4::Auth_with_cas::logout_if_required($query); --