|
Lines 1330-1335
sub libraries_where_can_see_patrons {
Link Here
|
| 1330 |
return @restricted_branchcodes; |
1330 |
return @restricted_branchcodes; |
| 1331 |
} |
1331 |
} |
| 1332 |
|
1332 |
|
|
|
1333 |
=head3 has_permission |
| 1334 |
|
| 1335 |
my $permission = $patron->has_permission($required); |
| 1336 |
|
| 1337 |
See C4::Auth::haspermission for details of syntax for $required |
| 1338 |
|
| 1339 |
=cut |
| 1340 |
|
| 1333 |
sub has_permission { |
1341 |
sub has_permission { |
| 1334 |
my ( $self, $flagsrequired ) = @_; |
1342 |
my ( $self, $flagsrequired ) = @_; |
| 1335 |
return unless $self->userid; |
1343 |
return unless $self->userid; |
| 1336 |
- |
|
|