Bug 12343: QA follow-up
Signed-off-by: Jonathan Druart <jonathan.druart@biblibre.com> Signed-off-by: Galen Charlton <gmc@esilibrary.com>
This commit is contained in:
parent
293776bdd2
commit
f7f2db2f9c
|
|
@ -2194,9 +2194,10 @@ sub TransformKohaToMarc {
|
|||
while ( my ($name, $value) = each %$hash ) {
|
||||
next unless my $dtm = $db_to_marc->{''}->{$name};
|
||||
next unless ( scalar( @$dtm ) );
|
||||
my ($tag, $letter) = @$dtm; $tag .= '';
|
||||
my ($tag, $letter) = @$dtm;
|
||||
$tag .= '';
|
||||
foreach my $value ( split(/\s?\|\s?/, $value, -1) ) {
|
||||
$value eq '' && next;
|
||||
next if $value eq '';
|
||||
$tag_hr->{$tag} //= [];
|
||||
push @{$tag_hr->{$tag}}, [($letter, $value)];
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue