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 |
- |
|
|