|
Lines 40-45
use C4::Serials qw( CountSubscriptionFromBiblionumber SearchSubscriptions GetLat
Link Here
|
| 40 |
use C4::XISBN qw( get_xisbns ); |
40 |
use C4::XISBN qw( get_xisbns ); |
| 41 |
use C4::External::Amazon qw( get_amazon_tld ); |
41 |
use C4::External::Amazon qw( get_amazon_tld ); |
| 42 |
use C4::Search qw( z3950_search_args enabled_staff_search_views new_record_from_zebra ); |
42 |
use C4::Search qw( z3950_search_args enabled_staff_search_views new_record_from_zebra ); |
|
|
43 |
use C4::External::BakerTaylor qw( image_url link_url ); |
| 43 |
use C4::Tags qw( get_tags ); |
44 |
use C4::Tags qw( get_tags ); |
| 44 |
use C4::XSLT qw( XSLTParse4Display ); |
45 |
use C4::XSLT qw( XSLTParse4Display ); |
| 45 |
use Koha::DateUtils qw( format_sqldatetime ); |
46 |
use Koha::DateUtils qw( format_sqldatetime ); |
|
Lines 511-516
foreach ( keys %{$dat} ) {
Link Here
|
| 511 |
# does not work: my %views_enabled = map { $_ => 1 } $template->query(loop => 'EnableViews'); |
512 |
# does not work: my %views_enabled = map { $_ => 1 } $template->query(loop => 'EnableViews'); |
| 512 |
# method query not found?!?! |
513 |
# method query not found?!?! |
| 513 |
$template->param( AmazonTld => get_amazon_tld() ) if ( C4::Context->preference("AmazonCoverImages")); |
514 |
$template->param( AmazonTld => get_amazon_tld() ) if ( C4::Context->preference("AmazonCoverImages")); |
|
|
515 |
|
| 516 |
if (C4::Context->preference("BakerTaylorEnabled")) { |
| 517 |
$template->param( |
| 518 |
BakerTaylorEnabled => 1, |
| 519 |
BakerTaylorImageURL => &image_url(), |
| 520 |
BakerTaylorLinkURL => &link_url(), |
| 521 |
BakerTaylorBookstoreURL => C4::Context->preference('BakerTaylorBookstoreURL'), |
| 522 |
); |
| 523 |
my ($bt_user, $bt_pass); |
| 524 |
if ($isbn and |
| 525 |
$bt_user = C4::Context->preference('BakerTaylorUsername') and |
| 526 |
$bt_pass = C4::Context->preference('BakerTaylorPassword') ) |
| 527 |
{ |
| 528 |
$template->param( |
| 529 |
BakerTaylorContentURL => |
| 530 |
sprintf("https://contentcafe2.btol.com/ContentCafeClient/ContentCafe.aspx?UserID=%s&Password=%s&ItemKey=%s&Options=Y", |
| 531 |
$bt_user,$bt_pass,$isbn) |
| 532 |
); |
| 533 |
} |
| 534 |
} |
| 535 |
|
| 514 |
$template->param( |
536 |
$template->param( |
| 515 |
itemloop => \@itemloop, |
537 |
itemloop => \@itemloop, |
| 516 |
otheritemloop => \@otheritemloop, |
538 |
otheritemloop => \@otheritemloop, |