[Koha-cvs] koha/cataloguing/value_builder unimarc_field_4X... [rel_3_0]

[Henri-Damien LAURENT]

CVSROOT:        /cvsroot/koha
Module name:    koha
Branch:         rel_3_0
Changes by:     Henri-Damien LAURENT <hdl>      06/12/12 08:53:22

Modified files:
        cataloguing/value_builder: unimarc_field_4XX.pl 

Log message:
        Commenting out a warning

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/cataloguing/value_builder/unimarc_field_4XX.pl?cvsroot=koha&only_with_tag=rel_3_0&r1=1.1.2.7&r2=1.1.2.8

Patches:
Index: unimarc_field_4XX.pl
===================================================================
RCS file: 
/cvsroot/koha/koha/cataloguing/value_builder/Attic/unimarc_field_4XX.pl,v
retrieving revision 1.1.2.7
retrieving revision 1.1.2.8
diff -u -b -r1.1.2.7 -r1.1.2.8
--- unimarc_field_4XX.pl        12 Dec 2006 08:36:30 -0000      1.1.2.7
+++ unimarc_field_4XX.pl        12 Dec 2006 08:53:22 -0000      1.1.2.8
@@ -68,7 +68,7 @@
     my $query = new CGI;
     my $op = $query->param('op');
     my $type=$query->param('type');
-    warn "operation  ".$op;
+#     warn "operation  ".$op;
     my $startfrom=$query->param('startfrom');
     $startfrom=0 if(!defined $startfrom);
     my ($template, $loggedinuser, $cookie);
@@ -250,7 +250,7 @@
             $rechash->{CN}=$CN;
             push @arrayresults,$rechash;
         }
-        use Data::Dumper;warn Dumper(@arrayresults);
+#         use Data::Dumper;warn Dumper(@arrayresults);
     
     
 #         for(my $i = 0 ; $i <= $#marclist ; $i++)