@@ -, +, @@ on verbose --- misc/migration_tools/bulkmarcimport.pl | 26 ++++++++++++++------------ 1 file changed, 14 insertions(+), 12 deletions(-) --- a/misc/migration_tools/bulkmarcimport.pl +++ a/misc/migration_tools/bulkmarcimport.pl @@ -122,19 +122,21 @@ if(defined $localcust) { #local customize module if($marc_mod_template ne '') { my @templates = GetModificationTemplates(); foreach my $this_template (@templates) { - if($this_template->{'name'} eq $marc_mod_template) { - if($marc_mod_template_id < 0) { - $marc_mod_template_id = $this_template->{'template_id'}; - } else { - print "WARNING: MARC modification template name " . - "'$marc_mod_template' matches multiple templates. " . - "Please rename these templates\n"; - exit 1; - } - } + if($this_template->{'name'} eq $marc_mod_template) { + if($marc_mod_template_id < 0) { + $marc_mod_template_id = $this_template->{'template_id'}; + } else { + print "WARNING: MARC modification template name " . + "'$marc_mod_template' matches multiple templates. " . + "Please rename these templates\n"; + exit 1; + } + } } if($marc_mod_template_id < 0) { - die "Can't located MARC modification template '$marc_mod_template'\n"; + die "Can't located MARC modification template '$marc_mod_template'\n"; + } else { + print "Records will be modified using MARC modofication template: $marc_mod_template\n" if $verbose; } } @@ -288,7 +290,7 @@ RECORD: while ( ) { } SetUTF8Flag($record); if($marc_mod_template_id > 0) { - print "Modifying MARC\n"; + print "Modifying MARC\n" if $verbose; ModifyRecordWithTemplate( $marc_mod_template_id, $record ); } &$localcust($record) if $localcust; --