Owen Leonard
5a0dffcaac
- Adding simple style to register link on home page - Adding unique ids to new pages and to blocks containing registration links - Adding better page titles and breadcrumb links to some pages - Correcting bug which meant incorrect message showed on registration page when OPACPatronDetails preferences is turned off - Passing patron details to opac-memberentry.tt so that patron's name can be displayed in breadcrumbs - Improving display in staff client of patron record updates waiting to be approved. - Adding a sort by name to output of pending patron record updates - Adding updated JqueryUI library files to include expanded widget options. The changes in this patch require the addition of the jQueryUI Accordion widget. Other pending patches are seeking to add enough of the other remaining missing widgets that it seems time to go ahead and add the rest. Future submissions which add usage of these widgets will have to be careful to make changes to Koha's CSS where necessary. Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com> Passed-QA-by: Jonathan Druart <jonathan.druart@biblibre.com> Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
91 lines
2.6 KiB
Perl
Executable file
91 lines
2.6 KiB
Perl
Executable file
#!/usr/bin/perl
|
|
|
|
# Parts Copyright Biblibre 2010
|
|
# 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 2 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, write to the Free Software Foundation, Inc.,
|
|
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use CGI;
|
|
use C4::Auth;
|
|
use C4::Output;
|
|
use C4::Context;
|
|
use C4::Members;
|
|
use C4::Branch;
|
|
use C4::Category;
|
|
use Koha::Borrower::Modifications;
|
|
|
|
my $query = new CGI;
|
|
my $branch = $query->param('branchcode');
|
|
my $template_name;
|
|
|
|
$branch = q{} unless defined $branch;
|
|
|
|
my ($template, $loggedinuser, $cookie)
|
|
= get_template_and_user({template_name => "members/member.tmpl",
|
|
query => $query,
|
|
type => "intranet",
|
|
authnotrequired => 0,
|
|
flagsrequired => {borrowers => 1},
|
|
debug => 1,
|
|
});
|
|
|
|
my $branches = GetBranches;
|
|
my @branchloop;
|
|
foreach (sort { $branches->{$a}->{branchname} cmp $branches->{$b}->{branchname} } keys %{$branches}) {
|
|
push @branchloop, {
|
|
value => $_,
|
|
selected => ($branches->{$_}->{branchcode} eq $branch),
|
|
branchname => $branches->{$_}->{branchname},
|
|
};
|
|
}
|
|
|
|
my @categories;
|
|
my $no_categories;
|
|
my $no_add = 0;
|
|
if(scalar(@branchloop) < 1){
|
|
$no_add = 1;
|
|
$template->param(no_branches => 1);
|
|
}
|
|
else {
|
|
$template->param(branchloop=>\@branchloop);
|
|
}
|
|
|
|
@categories=C4::Category->all;
|
|
if(scalar(@categories) < 1){
|
|
$no_categories = 1;
|
|
}
|
|
|
|
if($no_categories && C4::Context->preference("AddPatronLists")=~/code/){
|
|
$no_add = 1;
|
|
$template->param(no_categories => 1);
|
|
}
|
|
else {
|
|
$template->param(categories=>\@categories);
|
|
}
|
|
|
|
|
|
my $pending_borrower_modifications =
|
|
Koha::Borrower::Modifications->GetPendingModificationsCount( $branch );
|
|
|
|
$template->param(
|
|
"AddPatronLists_".C4::Context->preference("AddPatronLists")=> "1",
|
|
no_add => $no_add,
|
|
pending_borrower_modifications => $pending_borrower_modifications,
|
|
);
|
|
$template->param( 'alphabet' => C4::Context->preference('alphabet') || join ' ', 'A' .. 'Z' );
|
|
|
|
output_html_with_http_headers $query, $cookie, $template->output;
|