Lines 31-42
use C4::Output;
Link Here
|
31 |
use C4::Biblio; |
31 |
use C4::Biblio; |
32 |
use C4::Items; |
32 |
use C4::Items; |
33 |
use C4::Circulation; |
33 |
use C4::Circulation; |
34 |
use C4::Tags qw(get_tags); |
|
|
35 |
use C4::Dates qw/format_date/; |
34 |
use C4::Dates qw/format_date/; |
36 |
use C4::XISBN qw(get_xisbns get_biblionumber_from_isbn); |
35 |
use C4::XISBN qw(get_xisbns get_biblionumber_from_isbn); |
37 |
use C4::External::Amazon; |
36 |
use C4::External::Amazon; |
38 |
use C4::External::Syndetics qw(get_syndetics_index get_syndetics_summary get_syndetics_toc get_syndetics_excerpt get_syndetics_reviews get_syndetics_anotes ); |
37 |
use C4::External::Syndetics qw(get_syndetics_index get_syndetics_summary get_syndetics_toc get_syndetics_excerpt get_syndetics_reviews get_syndetics_anotes ); |
39 |
use C4::Review; |
|
|
40 |
use C4::Members; |
38 |
use C4::Members; |
41 |
use C4::VirtualShelves; |
39 |
use C4::VirtualShelves; |
42 |
use C4::XSLT; |
40 |
use C4::XSLT; |
Lines 302-329
eval 'use Libravatar::URL';
Link Here
|
302 |
if (!$@ and C4::Context->preference('ShowReviewer') and C4::Context->preference('ShowReviewerPhoto')) { |
300 |
if (!$@ and C4::Context->preference('ShowReviewer') and C4::Context->preference('ShowReviewerPhoto')) { |
303 |
$libravatar_enabled = 1; |
301 |
$libravatar_enabled = 1; |
304 |
} |
302 |
} |
305 |
|
303 |
if (C4::Context->preference("reviewson")) { |
306 |
my $reviews = getreviews( $biblionumber, 1 ); |
304 |
require C4::Review; |
307 |
my $loggedincommenter; |
305 |
my $reviews = C4::Review::getreviews( $biblionumber, 1 ); |
308 |
foreach ( @$reviews ) { |
306 |
my $loggedincommenter; |
309 |
my $borrowerData = GetMember('borrowernumber' => $_->{borrowernumber}); |
307 |
foreach ( @$reviews ) { |
310 |
# setting some borrower info into this hash |
308 |
my $borrowerData = GetMember('borrowernumber' => $_->{borrowernumber}); |
311 |
$_->{title} = $borrowerData->{'title'}; |
309 |
# setting some borrower info into this hash |
312 |
$_->{surname} = $borrowerData->{'surname'}; |
310 |
$_->{title} = $borrowerData->{'title'}; |
313 |
$_->{firstname} = $borrowerData->{'firstname'}; |
311 |
$_->{surname} = $borrowerData->{'surname'}; |
314 |
if ($libravatar_enabled and $borrowerData->{'email'}) { |
312 |
$_->{firstname} = $borrowerData->{'firstname'}; |
315 |
$_->{avatarurl} = libravatar_url(email => $borrowerData->{'email'}, https => $ENV{HTTPS}); |
313 |
if ($libravatar_enabled and $borrowerData->{'email'}) { |
|
|
314 |
$_->{avatarurl} = libravatar_url(email => $borrowerData->{'email'}, https => $ENV{HTTPS}); |
315 |
} |
316 |
$_->{userid} = $borrowerData->{'userid'}; |
317 |
$_->{cardnumber} = $borrowerData->{'cardnumber'}; |
318 |
$_->{datereviewed} = format_date($_->{datereviewed}); |
319 |
if ($borrowerData->{'borrowernumber'} eq $borrowernumber) { |
320 |
$_->{your_comment} = 1; |
321 |
$loggedincommenter = 1; |
322 |
} |
316 |
} |
323 |
} |
317 |
$_->{userid} = $borrowerData->{'userid'}; |
324 |
$template->param( |
318 |
$_->{cardnumber} = $borrowerData->{'cardnumber'}; |
325 |
reviews => $reviews, |
319 |
$_->{datereviewed} = format_date($_->{datereviewed}); |
326 |
loggedincommenter => $loggedincommenter |
320 |
if ($borrowerData->{'borrowernumber'} eq $borrowernumber) { |
327 |
); |
321 |
$_->{your_comment} = 1; |
|
|
322 |
$loggedincommenter = 1; |
323 |
} |
324 |
} |
328 |
} |
325 |
|
329 |
|
326 |
|
|
|
327 |
if(C4::Context->preference("ISBD")) { |
330 |
if(C4::Context->preference("ISBD")) { |
328 |
$template->param(ISBD => 1); |
331 |
$template->param(ISBD => 1); |
329 |
} |
332 |
} |
Lines 334-341
$template->param(
Link Here
|
334 |
biblionumber => $biblionumber, |
337 |
biblionumber => $biblionumber, |
335 |
subscriptions => \@subs, |
338 |
subscriptions => \@subs, |
336 |
subscriptionsnumber => $subscriptionsnumber, |
339 |
subscriptionsnumber => $subscriptionsnumber, |
337 |
reviews => $reviews, |
|
|
338 |
loggedincommenter => $loggedincommenter |
339 |
); |
340 |
); |
340 |
|
341 |
|
341 |
# Lists |
342 |
# Lists |
Lines 546-557
if (C4::Context->preference("BakerTaylorEnabled")) {
Link Here
|
546 |
|
547 |
|
547 |
my $tag_quantity; |
548 |
my $tag_quantity; |
548 |
if (C4::Context->preference('TagsEnabled') and $tag_quantity = C4::Context->preference('TagsShowOnDetail')) { |
549 |
if (C4::Context->preference('TagsEnabled') and $tag_quantity = C4::Context->preference('TagsShowOnDetail')) { |
|
|
550 |
require C4::Tags; |
549 |
$template->param( |
551 |
$template->param( |
550 |
TagsEnabled => 1, |
552 |
TagsEnabled => 1, |
551 |
TagsShowOnDetail => $tag_quantity, |
553 |
TagsShowOnDetail => $tag_quantity, |
552 |
TagsInputOnDetail => C4::Context->preference('TagsInputOnDetail') |
554 |
TagsInputOnDetail => C4::Context->preference('TagsInputOnDetail') |
553 |
); |
555 |
); |
554 |
$template->param(TagLoop => get_tags({biblionumber=>$biblionumber, approved=>1, |
556 |
$template->param(TagLoop => C4::Tags::get_tags({biblionumber=>$biblionumber, approved=>1, |
555 |
'sort'=>'-weight', limit=>$tag_quantity})); |
557 |
'sort'=>'-weight', limit=>$tag_quantity})); |
556 |
} |
558 |
} |
557 |
|
559 |
|
558 |
- |
|
|