[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;