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