gitea
/
Koha-clms
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Bug 18389: (QA follow-up) Fix tabs, note used template, info on verbose 

Fixed whitespace for QA tools
Added a verbose note when template found
Only print 'Modifying MARC' if verbose

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
This commit is contained in:
Nick Clemens 2017-10-26 10:46:03 +00:00 committed by Jonathan Druart
parent ab586abaee
commit 6835760dcf
1 changed files with 14 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
misc/migration_tools/bulkmarcimport.pl
View File

@ -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;