View | Details | Raw Unified | Return to bug 23634
Collapse All | Expand All

(-)a/Koha/Patron.pm (-1 / +13 lines)
Lines 1361-1366 sub has_permission { Link Here
1361
    return C4::Auth::haspermission( $self->userid, $flagsrequired );
1361
    return C4::Auth::haspermission( $self->userid, $flagsrequired );
1362
}
1362
}
1363
1363
1364
=head3 is_superlibrarian
1365
1366
  my $is_superlibrarian = $patron->is_superlibrarian;
1367
1368
Return true if the patron is a superlibrarian.
1369
1370
=cut
1371
1372
sub is_superlibrarian {
1373
    my ($self) = @_;
1374
    return $self->has_permission( { superlibrarian => 1 } );
1375
}
1376
1364
=head3 is_adult
1377
=head3 is_adult
1365
1378
1366
my $is_adult = $patron->is_adult
1379
my $is_adult = $patron->is_adult
1367
- 

Return to bug 23634