[Koha-cvs] koha/misc/migration_tools bulkmarcimport.pl

[Joshua Ferraro]

CVSROOT:        /sources/koha
Module name:    koha
Branch:         
Changes by:     Joshua Ferraro <address@hidden> 06/02/25 23:40:59

Modified files:
        misc/migration_tools: bulkmarcimport.pl 

Log message:
        minor bugfix with 'commit' option

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/koha/misc/migration_tools/bulkmarcimport.pl.diff?tr1=1.3&tr2=1.4&r1=text&r2=text

Patches:
Index: koha/misc/migration_tools/bulkmarcimport.pl
diff -u koha/misc/migration_tools/bulkmarcimport.pl:1.3 
koha/misc/migration_tools/bulkmarcimport.pl:1.4
--- koha/misc/migration_tools/bulkmarcimport.pl:1.3     Sat Feb 25 21:53:48 2006
+++ koha/misc/migration_tools/bulkmarcimport.pl Sat Feb 25 23:40:59 2006
@@ -81,7 +81,13 @@
 $batch->warnings_off();
 $batch->strict_off();
 my $i=0;
-$commit = 50 unless ($commit);
+my $commitnum = 50;
+
+if ($commit) {
+
+$commitnum = $commit;
+
+}
 
 #1st of all, find item MARC tag.
 my ($tagfield,$tagsubfield) = 
&MARCfind_marc_from_kohafield($dbh,"items.itemnumber",'');
@@ -93,7 +99,7 @@
 
        if ($i==$number) {
                
z3950_extended_services($Zconn,'commit',set_service_options('commit'));
-               print "COMMIT OPERATION SUCCESSFUL\n" if $verbose;
+               print "COMMIT OPERATION SUCCESSFUL\n";
 
                my $timeneeded = gettimeofday - $starttime;
                die "$i MARC records imported in $timeneeded seconds\n";
@@ -101,8 +107,8 @@
        # perform the commit operation ever so often
        if ($i==$commit) {
                
z3950_extended_services($Zconn,'commit',set_service_options('commit'));
-               $commit*=2;
-               print "COMMIT OPERATION SUCCESSFUL\n" if $verbose;
+               $commit+=$commitnum;
+               print "COMMIT OPERATION SUCCESSFUL\n";
        }
        #now, parse the record, extract the item fields, and store them in 
somewhere else.
 
@@ -165,7 +171,7 @@
 }
 # final commit of the changes
 z3950_extended_services($Zconn,'commit',set_service_options('commit'));
-print "COMMIT OPERATION SUCCESSFUL\n" if $verbose;
+print "COMMIT OPERATION SUCCESSFUL\n";
 
 my $timeneeded = gettimeofday - $starttime;
 print "$i MARC records done in $timeneeded seconds\n";