[Koha-cvs] koha/C4 Koha.pm [rel_2_2]

[paul poulain]

CVSROOT:        /cvsroot/koha
Module name:    koha
Branch:         rel_2_2
Changes by:     paul poulain <tipaul>   06/11/22 10:22:09

Modified files:
        C4             : Koha.pm 

Log message:
        removing 2 warns

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Koha.pm?cvsroot=koha&only_with_tag=rel_2_2&r1=1.22.2.5&r2=1.22.2.6

Patches:
Index: Koha.pm
===================================================================
RCS file: /cvsroot/koha/koha/C4/Koha.pm,v
retrieving revision 1.22.2.5
retrieving revision 1.22.2.6
diff -u -b -r1.22.2.5 -r1.22.2.6
--- Koha.pm     3 Nov 2006 10:56:59 -0000       1.22.2.5
+++ Koha.pm     22 Nov 2006 10:22:08 -0000      1.22.2.6
@@ -669,8 +669,6 @@
     $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 @@
         $newRecord->insert_grouped_field($newField);
       }
     }
-    warn $newRecord->as_formatted(); 
+#     warn $newRecord->as_formatted(); 
     return $newRecord;
   } else {
     return $record;