|
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, |