projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 8015: QA Followup 2
[koha.git]
/
members
/
members-home.pl
diff --git
a/members/members-home.pl
b/members/members-home.pl
index
61eb83a
..
1d8f1e5
100755
(executable)
--- a/
members/members-home.pl
+++ b/
members/members-home.pl
@@
-26,6
+26,7
@@
use C4::Context;
use C4::Members;
use C4::Branch;
use C4::Category;
use C4::Members;
use C4::Branch;
use C4::Category;
+use Koha::Borrower::Modifications;
my $query = new CGI;
my $branch = $query->param('branchcode');
my $query = new CGI;
my $branch = $query->param('branchcode');
@@
-76,10
+77,15
@@
else {
$template->param(categories=>\@categories);
}
$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,
$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') );
+$template->param( 'alphabet' => C4::Context->preference('alphabet')
|| join ' ', 'A' .. 'Z'
);
output_html_with_http_headers $query, $cookie, $template->output;
output_html_with_http_headers $query, $cookie, $template->output;