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

(-)a/Koha/Template/Plugin/EncodeUTF8.pm (-32 lines)
Lines 1-31 Link Here
1
package Koha::Template::Plugin::EncodeUTF8;
2
3
# Copyright Bywater Solutions 2013
4
5
# This file is part of Koha.
6
#
7
# Koha is free software; you can redistribute it and/or modify it under the
8
# terms of the GNU General Public License as published by the Free Software
9
# Foundation; either version 3 of the License, or (at your option) any later
10
# version.
11
#
12
# Koha is distributed in the hope that it will be useful, but WITHOUT ANY
13
# WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
14
# A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
15
#
16
# You should have received a copy of the GNU General Public License along
17
# with Koha; if not, write to the Free Software Foundation, Inc.,
18
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19
20
use Modern::Perl;
21
22
use base qw{Template::Plugin::Filter};
23
24
use Encode qw{encode is_utf8};
25
26
sub filter {
27
    my ( $self, $value ) = @_;
28
    return Encode::is_utf8( $value ) ? Encode::encode( 'UTF-8', $value ) : $value;
29
}
30
31
1;
32
- 

Return to bug 11944