baea0a79d5
The borrow permission was used but uselessly. For instance, at the opac, the flagsrequired parameter was set to 'borrow' but the 'authnotrequired' was set also (which means no auth required). At the end, this permission was used at only 1 place: for the basket, intranet side. This can be replaced with the catalogue permission (which is used to search). Test plan: 1/ Confirm that you are able to show/download/sent the cart (intranet side) with the catalogue permission. 2/ At the OPAC, you should be able to access the same pages as before with any other permissions. Concretely it is quite difficult to test this patch, you should have a look at the code. Signed-off-by: Nick Clemens <nick@quecheelibrary.org> Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de> Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
40 lines
1.2 KiB
Perl
Executable file
40 lines
1.2 KiB
Perl
Executable file
#!/usr/bin/perl
|
|
|
|
use Modern::Perl;
|
|
use CGI qw ( -utf8 );
|
|
|
|
use C4::Auth;
|
|
use C4::Context;
|
|
use C4::Output;
|
|
use C4::ShelfBrowser;
|
|
|
|
my $cgi = new CGI;
|
|
|
|
my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
|
|
{
|
|
template_name => "svc/shelfbrowser.tt",
|
|
query => $cgi,
|
|
type => "opac",
|
|
authnotrequired => ( C4::Context->preference("OpacPublic") ? 1 : 0 ),
|
|
}
|
|
);
|
|
|
|
# Shelf Browser Stuff
|
|
if (C4::Context->preference("OPACShelfBrowser")) {
|
|
my $starting_itemnumber = $cgi->param('shelfbrowse_itemnumber');
|
|
if (defined($starting_itemnumber)) {
|
|
my $nearby = GetNearbyItems($starting_itemnumber);
|
|
|
|
$template->param(
|
|
starting_homebranch => $nearby->{starting_homebranch}->{description},
|
|
starting_location => $nearby->{starting_location}->{description},
|
|
starting_ccode => $nearby->{starting_ccode}->{description},
|
|
shelfbrowser_prev_item => $nearby->{prev_item},
|
|
shelfbrowser_next_item => $nearby->{next_item},
|
|
shelfbrowser_items => $nearby->{items},
|
|
OpenOPACShelfBrowser => 1,
|
|
);
|
|
}
|
|
}
|
|
|
|
output_html_with_http_headers $cgi, $cookie, $template->output;
|