[Koha-cvs] CVS: koha/misc/migration_tools buildEDITORS.pl,1.1.2.1,1.1.2.2

[Paul POULAIN]

Update of /cvsroot/koha/koha/misc/migration_tools
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12612/misc/migration_tools

Modified Files:
      Tag: rel_2_2
        buildEDITORS.pl 
Log Message:
script a little bit less verbose...

Index: buildEDITORS.pl
===================================================================
RCS file: /cvsroot/koha/koha/misc/migration_tools/Attic/buildEDITORS.pl,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -C2 -r1.1.2.1 -r1.1.2.2
*** buildEDITORS.pl     11 Jan 2005 15:13:37 -0000      1.1.2.1
--- buildEDITORS.pl     1 Mar 2005 13:09:18 -0000       1.1.2.2
***************
*** 105,109 ****
        print ".";
        my $timeneeded = gettimeofday - $starttime;
!       print "$counter in $timeneeded s\n" unless ($counter % 50);
        
        my $field = $record->field('210');
--- 105,109 ----
        print ".";
        my $timeneeded = gettimeofday - $starttime;
!       print "$counter in $timeneeded s\n" unless ($counter % 100);
        
        my $field = $record->field('210');
***************
*** 115,119 ****
        $collection=$field->subfield('a') if $field;
        
!       print "WARNING : editor empty for ".$record->as_formatted unless 
$editor and !$verbose;
  
        $hash{$seg1.$seg2}->{editors} = $editor unless 
($hash{$seg1.$seg2}->{editors});
--- 115,119 ----
        $collection=$field->subfield('a') if $field;
        
! #     print "WARNING : editor empty for ".$record->as_formatted unless 
$editor and !$verbose;
  
        $hash{$seg1.$seg2}->{editors} = $editor unless 
($hash{$seg1.$seg2}->{editors});