Marcel de Rooy
0aa87832dd
Note: I am using $rs in the script to prevent searching branches again unneeded. And pass public_count to opac-library.tt to prevent another call of Branches.all (for bread crumbs), like masthead already does btw. Test plan: [1] Have two (or more) public libraries. Verify that you see Libraries on the OPAC home page and that when clicking Libraries, you first have the library list. Are the bread crumbs as expected? Click a library on that list. Do you get its details? Are the bread crumbs as expected? [2] Now have only one public library. Verify that you see Contact on the home page. And that when clicking Contact you go directly to the library details without the intermediate library list. Are the bread crumbs still as expected (with Contact instead of Libraries)? Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl> Signed-off-by: Owen Leonard <oleonard@myacpl.org> Signed-off-by: Paul Derscheid <paul.derscheid@lmscloud.de> Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
65 lines
2 KiB
Perl
Executable file
65 lines
2 KiB
Perl
Executable file
#!/usr/bin/perl
|
|
|
|
# Copyright 2020 Athens County Public Libraries
|
|
#
|
|
# This file is part of Koha.
|
|
#
|
|
# Koha is free software; you can redistribute it and/or modify it
|
|
# under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# Koha is distributed in the hope that it will be useful, but
|
|
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with Koha; if not, see <http://www.gnu.org/licenses>.
|
|
|
|
use Modern::Perl;
|
|
|
|
use CGI qw ( -utf8 );
|
|
use C4::Auth qw( get_template_and_user );
|
|
use C4::Context;
|
|
use C4::Output qw( output_html_with_http_headers );
|
|
use Koha::Libraries;
|
|
|
|
my $query = CGI->new();
|
|
|
|
my $branchcode = $query->param('branchcode');
|
|
|
|
# if OPACShowLibraries is disabled, leave immediately
|
|
if ( !C4::Context->preference('OPACShowLibraries') ) {
|
|
print $query->redirect("/cgi-bin/koha/errors/404.pl");
|
|
exit;
|
|
}
|
|
|
|
my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
|
|
{
|
|
template_name => "opac-library.tt",
|
|
query => $query,
|
|
type => "opac",
|
|
authnotrequired => ( C4::Context->preference("OpacPublic") ? 1 : 0 ),
|
|
}
|
|
);
|
|
|
|
my $library;
|
|
my $libraries = Koha::Libraries->search( { public => 1 }, { order_by => ['branchname'] } );
|
|
$template->param( public_count => $libraries->count );
|
|
if ( $template->{VARS}->{singleBranchMode} || $libraries->count == 1 ) {
|
|
$library = $libraries->next;
|
|
} elsif ($branchcode) {
|
|
$library = $libraries->search( { branchcode => $branchcode } )->next;
|
|
}
|
|
|
|
if ($library) {
|
|
$template->param( library => $library );
|
|
} else {
|
|
$template->param(
|
|
libraries => $libraries,
|
|
branchcode => C4::Context->userenv ? C4::Context->userenv->{branch} : q{},
|
|
);
|
|
}
|
|
|
|
output_html_with_http_headers $query, $cookie, $template->output;
|