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