1 package Koha
::Template
::Plugin
::Categories
;
3 # Copyright 2013-2014 BibLibre
5 # Koha is free software; you can redistribute it and/or modify it
6 # under the terms of the GNU General Public License as published by
7 # the Free Software Foundation; either version 3 of the License, or
8 # (at your option) any later version.
10 # Koha is distributed in the hope that it will be useful, but
11 # WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
15 # You should have received a copy of the GNU General Public License
16 # along with Koha; if not, see <http://www.gnu.org/licenses>.
21 use base
qw( Template::Plugin );
24 use Koha
::Patron
::Categories
;
27 my ( $self, $categorycode ) = @_;
29 return Koha
::Patron
::Categories
->find( $categorycode )->description;
33 my ( $self, $params ) = @_;
34 my $selected = $params->{selected
};
36 my @categories = C4
::Category
->all;
38 for my $category ( @categories ) {
39 if ( $category->{categorycode
} eq $selected ) {
40 $category->{selected
} = 1;
51 Koha::Template::Plugin::Categories - TT Plugin for categories
57 [% Categories.all() %]
63 In a template, you can get the all categories with
64 the following TT code: [% Categories.all() %]
68 In a template, you can get the name of a patron category using
69 [% Categories.GetName( categorycode ) %].
73 Jonathan Druart <jonathan.druart@biblibre.com>