TransformHTMLToXML bug default_ind_to_space

default_ind_to_space made the assumption that indicator string by default was a string containing 2 characters.
This was not true, causing an Internal server error.
This patch Fixes that.
This commit is contained in:
Henri-Damien LAURENT 2009-10-06 17:50:36 +02:00
parent d09145090a
commit bfffa5361b

View file

@ -1769,6 +1769,7 @@ sub TransformHtmlToXml {
my $prevtag = -1; my $prevtag = -1;
my $first = 1; my $first = 1;
my $j = -1; my $j = -1;
@$indicator=map{sprintf("%2s",$_) unless ( length($_)<2)}@$indicator;
for ( my $i = 0 ; $i < @$tags ; $i++ ) { for ( my $i = 0 ; $i < @$tags ; $i++ ) {
if (C4::Context->preference('marcflavour') eq 'UNIMARC' and @$tags[$i] eq "100" and @$subfields[$i] eq "a") { if (C4::Context->preference('marcflavour') eq 'UNIMARC' and @$tags[$i] eq "100" and @$subfields[$i] eq "a") {
# if we have a 100 field and it's values are not correct, skip them. # if we have a 100 field and it's values are not correct, skip them.