View | Details | Raw Unified | Return to bug 6875
Collapse All | Expand All

(-)a/opac/opac-detail.pl (-25 / +26 lines)
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
- 

Return to bug 6875