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 616-643
if ( C4::Context->preference('ShowReviewer') and C4::Context->preference('ShowRe
Link Here
|
616 |
$libravatar_enabled = 1; |
614 |
$libravatar_enabled = 1; |
617 |
} |
615 |
} |
618 |
} |
616 |
} |
619 |
|
617 |
if (C4::Context->preference("reviewson")) { |
620 |
my $reviews = getreviews( $biblionumber, 1 ); |
618 |
require C4::Review; |
621 |
my $loggedincommenter; |
619 |
my $reviews = C4::Review::getreviews( $biblionumber, 1 ); |
622 |
foreach ( @$reviews ) { |
620 |
my $loggedincommenter; |
623 |
my $borrowerData = GetMember('borrowernumber' => $_->{borrowernumber}); |
621 |
foreach ( @$reviews ) { |
624 |
# setting some borrower info into this hash |
622 |
my $borrowerData = GetMember('borrowernumber' => $_->{borrowernumber}); |
625 |
$_->{title} = $borrowerData->{'title'}; |
623 |
# setting some borrower info into this hash |
626 |
$_->{surname} = $borrowerData->{'surname'}; |
624 |
$_->{title} = $borrowerData->{'title'}; |
627 |
$_->{firstname} = $borrowerData->{'firstname'}; |
625 |
$_->{surname} = $borrowerData->{'surname'}; |
628 |
if ($libravatar_enabled and $borrowerData->{'email'}) { |
626 |
$_->{firstname} = $borrowerData->{'firstname'}; |
629 |
$_->{avatarurl} = libravatar_url(email => $borrowerData->{'email'}, https => $ENV{HTTPS}); |
627 |
if ($libravatar_enabled and $borrowerData->{'email'}) { |
|
|
628 |
$_->{avatarurl} = libravatar_url(email => $borrowerData->{'email'}, https => $ENV{HTTPS}); |
629 |
} |
630 |
$_->{userid} = $borrowerData->{'userid'}; |
631 |
$_->{cardnumber} = $borrowerData->{'cardnumber'}; |
632 |
$_->{datereviewed} = format_date($_->{datereviewed}); |
633 |
if ($borrowerData->{'borrowernumber'} eq $borrowernumber) { |
634 |
$_->{your_comment} = 1; |
635 |
$loggedincommenter = 1; |
636 |
} |
630 |
} |
637 |
} |
631 |
$_->{userid} = $borrowerData->{'userid'}; |
638 |
$template->param( |
632 |
$_->{cardnumber} = $borrowerData->{'cardnumber'}; |
639 |
reviews => $reviews, |
633 |
$_->{datereviewed} = format_date($_->{datereviewed}); |
640 |
loggedincommenter => $loggedincommenter |
634 |
if ($borrowerData->{'borrowernumber'} eq $borrowernumber) { |
641 |
); |
635 |
$_->{your_comment} = 1; |
|
|
636 |
$loggedincommenter = 1; |
637 |
} |
638 |
} |
642 |
} |
639 |
|
643 |
|
640 |
|
|
|
641 |
if(C4::Context->preference("ISBD")) { |
644 |
if(C4::Context->preference("ISBD")) { |
642 |
$template->param(ISBD => 1); |
645 |
$template->param(ISBD => 1); |
643 |
} |
646 |
} |
Lines 648-655
$template->param(
Link Here
|
648 |
biblionumber => $biblionumber, |
651 |
biblionumber => $biblionumber, |
649 |
subscriptions => \@subs, |
652 |
subscriptions => \@subs, |
650 |
subscriptionsnumber => $subscriptionsnumber, |
653 |
subscriptionsnumber => $subscriptionsnumber, |
651 |
reviews => $reviews, |
|
|
652 |
loggedincommenter => $loggedincommenter |
653 |
); |
654 |
); |
654 |
|
655 |
|
655 |
# Lists |
656 |
# Lists |
Lines 873-884
if (C4::Context->preference("BakerTaylorEnabled")) {
Link Here
|
873 |
|
874 |
|
874 |
my $tag_quantity; |
875 |
my $tag_quantity; |
875 |
if (C4::Context->preference('TagsEnabled') and $tag_quantity = C4::Context->preference('TagsShowOnDetail')) { |
876 |
if (C4::Context->preference('TagsEnabled') and $tag_quantity = C4::Context->preference('TagsShowOnDetail')) { |
|
|
877 |
require C4::Tags; |
876 |
$template->param( |
878 |
$template->param( |
877 |
TagsEnabled => 1, |
879 |
TagsEnabled => 1, |
878 |
TagsShowOnDetail => $tag_quantity, |
880 |
TagsShowOnDetail => $tag_quantity, |
879 |
TagsInputOnDetail => C4::Context->preference('TagsInputOnDetail') |
881 |
TagsInputOnDetail => C4::Context->preference('TagsInputOnDetail') |
880 |
); |
882 |
); |
881 |
$template->param(TagLoop => get_tags({biblionumber=>$biblionumber, approved=>1, |
883 |
$template->param(TagLoop => C4::Tags::get_tags({biblionumber=>$biblionumber, approved=>1, |
882 |
'sort'=>'-weight', limit=>$tag_quantity})); |
884 |
'sort'=>'-weight', limit=>$tag_quantity})); |
883 |
} |
885 |
} |
884 |
|
886 |
|
885 |
- |
|
|