|
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 427-432
foreach ( keys %{$dat} ) {
Link Here
|
| 427 |
# does not work: my %views_enabled = map { $_ => 1 } $template->query(loop => 'EnableViews'); |
428 |
# does not work: my %views_enabled = map { $_ => 1 } $template->query(loop => 'EnableViews'); |
| 428 |
# method query not found?!?! |
429 |
# method query not found?!?! |
| 429 |
$template->param( AmazonTld => get_amazon_tld() ) if ( C4::Context->preference("AmazonCoverImages")); |
430 |
$template->param( AmazonTld => get_amazon_tld() ) if ( C4::Context->preference("AmazonCoverImages")); |
|
|
431 |
|
| 432 |
if ( C4::Context->preference("BakerTaylorEnabled") ) { |
| 433 |
$template->param( |
| 434 |
BakerTaylorEnabled => 1, |
| 435 |
BakerTaylorImageURL => &image_url(), |
| 436 |
BakerTaylorLinkURL => &link_url(), |
| 437 |
BakerTaylorBookstoreURL => C4::Context->preference('BakerTaylorBookstoreURL'), |
| 438 |
); |
| 439 |
my ( $bt_user, $bt_pass ); |
| 440 |
if ( $isbn |
| 441 |
and $bt_user = C4::Context->preference('BakerTaylorUsername') |
| 442 |
and $bt_pass = C4::Context->preference('BakerTaylorPassword') ) |
| 443 |
{ |
| 444 |
$template->param( |
| 445 |
BakerTaylorContentURL => sprintf( |
| 446 |
"https://contentcafe2.btol.com/ContentCafeClient/ContentCafe.aspx?UserID=%s&Password=%s&ItemKey=%s&Options=Y", |
| 447 |
$bt_user, $bt_pass, $isbn |
| 448 |
) |
| 449 |
); |
| 450 |
} |
| 451 |
} |
| 452 |
|
| 430 |
$template->param( |
453 |
$template->param( |
| 431 |
biblionumber => $biblionumber, |
454 |
biblionumber => $biblionumber, |
| 432 |
($analyze? 'analyze':'detailview') =>1, |
455 |
($analyze? 'analyze':'detailview') =>1, |