From f8f2c3ae41bcb65cc66b3def0bc2475994b1e2b2 Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Wed, 22 Nov 2006 10:22:08 +0000
Subject: [PATCH] removing 2 warns

---
 C4/Koha.pm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/C4/Koha.pm b/C4/Koha.pm
index 1ab833ca03..53f17c2910 100644
--- a/C4/Koha.pm
+++ b/C4/Koha.pm
@@ -669,8 +669,6 @@ sub fixEncoding {
     $targetcharset="latin1" if (C4::Context->preference("TemplateEncoding") eq "iso-8859-1");
     my $decoder = guess_encoding($marc, qw/utf8 latin1/);
     die $decoder unless ref($decoder);
-    warn "decodage : ".$decoder->name;
-    warn "decodage cible : ".$targetcharset;
     my $newRecord=MARC::Record->new();
     foreach my $field ($record->fields()){
       if ($field->tag()<'010'){
@@ -695,7 +693,7 @@ sub fixEncoding {
         $newRecord->insert_grouped_field($newField);
       }
     }
-    warn $newRecord->as_formatted(); 
+#     warn $newRecord->as_formatted(); 
     return $newRecord;
   } else {
     return $record;
-- 
2.39.5