Bug 13545 [QA Followup] - Complete POD documentation

[koha.git] / admin / item_circulation_alerts.pl

diff --git a/admin/item_circulation_alerts.pl b/admin/item_circulation_alerts.pl
index 2bfb496..d1018c1 100755 (executable)
--- a/admin/item_circulation_alerts.pl
+++ b/admin/item_circulation_alerts.pl
@@ -18,7 +18,7 @@
 use strict;
 use warnings;
 
-use CGI;
+use CGI qw ( -utf8 );
 use File::Basename;
 use Encode;
 use JSON;
@@ -35,15 +35,6 @@ use C4::Output;
 # shortcut for long package name
 our $preferences = 'C4::ItemCirculationAlertPreference';
 
-# utf8 filter
-sub utf8 {
-    my ($data, @keys) = @_;
-    for (@keys) {
-        $data->{$_} = decode('utf8', $data->{$_});
-    }
-    $data;
-}
-
 # prepend "br_" to column name and replace spaces with "<br/>"
 sub br {
     my ($data, @keys) = @_;
@@ -61,7 +52,7 @@ sub show {
     my $dbh = C4::Context->dbh;
     my ($template, $user, $cookie) = get_template_and_user(
         {
-            template_name   => "admin/item_circulation_alerts.tmpl",
+            template_name   => "admin/item_circulation_alerts.tt",
             query           => $input,
             type            => "intranet",
             authnotrequired => 0,