|
Lines 714-724
my $session = get_session($cgi->cookie("CGISESSID"));
Link Here
|
| 714 |
my @addpubshelves; |
714 |
my @addpubshelves; |
| 715 |
my $pubshelves = $session->param('pubshelves'); |
715 |
my $pubshelves = $session->param('pubshelves'); |
| 716 |
my $barshelves = $session->param('barshelves'); |
716 |
my $barshelves = $session->param('barshelves'); |
|
|
717 |
my $OPACRssURL; |
| 717 |
foreach my $shelf (@$pubshelves) { |
718 |
foreach my $shelf (@$pubshelves) { |
| 718 |
next if ( ($shelf->{'owner'} != ($borrowernumber ? $borrowernumber : -1)) && ($shelf->{'category'} < 3) ); |
719 |
next if ( ($shelf->{'owner'} != ($borrowernumber ? $borrowernumber : -1)) && ($shelf->{'category'} < 3) ); |
| 719 |
push (@addpubshelves, $shelf); |
720 |
push (@addpubshelves, $shelf); |
| 720 |
} |
721 |
} |
| 721 |
|
722 |
|
|
|
723 |
if ( C4::Context->preference('OPACBaseURL') ne '' ) { |
| 724 |
$OPACRssURL = C4::Context->preference('OPACBaseURL'); |
| 725 |
$OPACRssURL=~s/https:/http:/; |
| 726 |
if ( $OPACRssURL !~ m/^http:\/\// ) { $OPACRssURL = "http://" . $OPACRssURL } |
| 727 |
$template->param( OPACBaseURL => $OPACRssURL ); |
| 728 |
} |
| 729 |
|
| 722 |
if (@addpubshelves) { |
730 |
if (@addpubshelves) { |
| 723 |
$template->param( addpubshelves => scalar (@addpubshelves)); |
731 |
$template->param( addpubshelves => scalar (@addpubshelves)); |
| 724 |
$template->param( addpubshelvesloop => \@addpubshelves); |
732 |
$template->param( addpubshelvesloop => \@addpubshelves); |
| 725 |
- |
|
|