|
Lines 30-40
use Koha::List::Patron;
Link Here
|
| 30 |
use Koha::Patron::Categories; |
30 |
use Koha::Patron::Categories; |
| 31 |
|
31 |
|
| 32 |
my $query = new CGI; |
32 |
my $query = new CGI; |
| 33 |
my $branch = $query->param('branchcode'); |
|
|
| 34 |
|
33 |
|
| 35 |
$branch = q{} unless defined $branch; |
34 |
my ($template, $loggedinuser, $cookie, $flags) |
| 36 |
|
|
|
| 37 |
my ($template, $loggedinuser, $cookie) |
| 38 |
= get_template_and_user({template_name => "members/member.tt", |
35 |
= get_template_and_user({template_name => "members/member.tt", |
| 39 |
query => $query, |
36 |
query => $query, |
| 40 |
type => "intranet", |
37 |
type => "intranet", |
|
Lines 58-66
else {
Link Here
|
| 58 |
$template->param(categories=>\@categories); |
55 |
$template->param(categories=>\@categories); |
| 59 |
} |
56 |
} |
| 60 |
|
57 |
|
|
|
58 |
my $branch = |
| 59 |
( C4::Context->preference("IndependentBranchesPatronModifications") |
| 60 |
|| C4::Context->preference("IndependentBranches") ) |
| 61 |
&& !$flags->{'superlibrarian'} |
| 62 |
? C4::Context->userenv()->{'branch'} |
| 63 |
: undef; |
| 61 |
|
64 |
|
| 62 |
my $pending_borrower_modifications = |
65 |
my $pending_borrower_modifications = Koha::Patron::Modifications->pending_count( $branch ); |
| 63 |
Koha::Patron::Modifications->pending_count( $branch ); |
|
|
| 64 |
|
66 |
|
| 65 |
$template->param( |
67 |
$template->param( |
| 66 |
no_add => $no_add, |
68 |
no_add => $no_add, |
| 67 |
- |
|
|