From 9d2e7a24a4c285dafb4f8681427d937061037db3 Mon Sep 17 00:00:00 2001
From: Henri-Damien LAURENT <henridamien.laurent@biblibre.com>
Date: Tue, 6 Oct 2009 17:50:36 +0200
Subject: [PATCH] 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.
---
 C4/Biblio.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
index 2de61b52b8..8f8629d159 100755
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -1744,6 +1744,7 @@ sub TransformHtmlToXml {
     my $prevtag = -1;
     my $first   = 1;
     my $j       = -1;
+	@$indicator=map{sprintf("%2s",$_) unless ( length($_)<2)}@$indicator;
     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 we have a 100 field and it's values are not correct, skip them.
-- 
2.39.5