From d426a91d0e488a28041730bd7853bd750512f0ae Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Tue, 25 Dec 2007 01:25:59 -0600 Subject: [PATCH] removed extraneous comments Signed-off-by: Chris Cormack Signed-off-by: Joshua Ferraro --- misc/migration_tools/bulkmarcimport.pl | 5 ----- 1 file changed, 5 deletions(-) diff --git a/misc/migration_tools/bulkmarcimport.pl b/misc/migration_tools/bulkmarcimport.pl index 686840f619..0e159becbd 100755 --- a/misc/migration_tools/bulkmarcimport.pl +++ b/misc/migration_tools/bulkmarcimport.pl @@ -207,7 +207,6 @@ if ($test_parameter) { my $marcFlavour = C4::Context->preference('marcflavour') || 'MARC21'; print "Characteristic MARC flavour: $marcFlavour\n" if $verbose; -# die; my $starttime = gettimeofday; my $batch = MARC::Batch->new( 'USMARC', $input_marc_file ); $batch->warnings_off(); @@ -229,7 +228,6 @@ while ( my $record = $batch->next() ) { print "\r$i" unless $i % 100; unless ($test_parameter) { - # FIXME add back dup barcode check my ( $bibid, $oldbibitemnum, $itemnumbers_ref, $errors_ref ); eval { ( $bibid, $oldbibitemnum, $itemnumbers_ref, $errors_ref ) = AddBiblioAndItems( $record, '' ); }; if ( $@ ) { @@ -249,9 +247,6 @@ $dbh->commit(); if ($fk_off) { $dbh->do("SET FOREIGN_KEY_CHECKS = 1"); } -# final commit of the changes -#z3950_extended_services('commit',set_service_options('commit')); -#print "COMMIT OPERATION SUCCESSFUL\n"; # restore CataloguingLog $dbh->do("UPDATE systempreferences SET value=$CataloguingLog WHERE variable='CataloguingLog'"); -- 2.39.5