@@ -, +, @@ --- Koha/Template/Plugin/Borrowers.pm | 7 +++ .../prog/en/includes/patron-search.inc | 51 +++++++++++++------- 2 files changed, 40 insertions(+), 18 deletions(-) --- a/Koha/Template/Plugin/Borrowers.pm +++ a/Koha/Template/Plugin/Borrowers.pm @@ -24,6 +24,8 @@ use base qw( Template::Plugin ); use Koha::Borrower::Debarments qw//; +use C4::Category; + =pod This plugin is a home for various patron related Template Toolkit functions @@ -48,4 +50,9 @@ sub IsDebarred { return Koha::Borrower::Debarments::IsDebarred($borrower->{borrowernumber}); } +sub getBorrowerCategories { + my ( $self ) = @_; + return C4::Category->all; +} + 1; --- a/koha-tmpl/intranet-tmpl/prog/en/includes/patron-search.inc +++ a/koha-tmpl/intranet-tmpl/prog/en/includes/patron-search.inc @@ -1,4 +1,6 @@ [% USE Koha %] +[% USE Borrowers %] +[% SET patron_categories = Borrowers.getBorrowerCategories() %]

[% LibraryName %]

--