Lines 39-44
use C4::Serials qw( CountSubscriptionFromBiblionumber SearchSubscriptions GetLat
Link Here
|
39 |
use C4::XISBN qw( get_xisbns ); |
39 |
use C4::XISBN qw( get_xisbns ); |
40 |
use C4::External::Amazon qw( get_amazon_tld ); |
40 |
use C4::External::Amazon qw( get_amazon_tld ); |
41 |
use C4::Search qw( z3950_search_args enabled_staff_search_views new_record_from_zebra ); |
41 |
use C4::Search qw( z3950_search_args enabled_staff_search_views new_record_from_zebra ); |
|
|
42 |
use C4::External::BakerTaylor qw( image_url link_url ); |
42 |
use C4::Tags qw( get_tags ); |
43 |
use C4::Tags qw( get_tags ); |
43 |
use C4::XSLT qw( XSLTParse4Display ); |
44 |
use C4::XSLT qw( XSLTParse4Display ); |
44 |
use Koha::DateUtils qw( format_sqldatetime ); |
45 |
use Koha::DateUtils qw( format_sqldatetime ); |
Lines 390-395
foreach ( keys %{$dat} ) {
Link Here
|
390 |
# does not work: my %views_enabled = map { $_ => 1 } $template->query(loop => 'EnableViews'); |
391 |
# does not work: my %views_enabled = map { $_ => 1 } $template->query(loop => 'EnableViews'); |
391 |
# method query not found?!?! |
392 |
# method query not found?!?! |
392 |
$template->param( AmazonTld => get_amazon_tld() ) if ( C4::Context->preference("AmazonCoverImages")); |
393 |
$template->param( AmazonTld => get_amazon_tld() ) if ( C4::Context->preference("AmazonCoverImages")); |
|
|
394 |
|
395 |
if ( C4::Context->preference("BakerTaylorEnabled") ) { |
396 |
$template->param( |
397 |
BakerTaylorEnabled => 1, |
398 |
BakerTaylorImageURL => &image_url(), |
399 |
BakerTaylorLinkURL => &link_url(), |
400 |
BakerTaylorBookstoreURL => C4::Context->preference('BakerTaylorBookstoreURL'), |
401 |
); |
402 |
my ( $bt_user, $bt_pass ); |
403 |
if ( $isbn |
404 |
and $bt_user = C4::Context->preference('BakerTaylorUsername') |
405 |
and $bt_pass = C4::Context->preference('BakerTaylorPassword') ) |
406 |
{ |
407 |
$template->param( |
408 |
BakerTaylorContentURL => sprintf( |
409 |
"https://contentcafe2.btol.com/ContentCafeClient/ContentCafe.aspx?UserID=%s&Password=%s&ItemKey=%s&Options=Y", |
410 |
$bt_user, $bt_pass, $isbn |
411 |
) |
412 |
); |
413 |
} |
414 |
} |
415 |
|
393 |
$template->param( |
416 |
$template->param( |
394 |
biblionumber => $biblionumber, |
417 |
biblionumber => $biblionumber, |
395 |
($analyze? 'analyze':'detailview') =>1, |
418 |
($analyze? 'analyze':'detailview') =>1, |