From 48f25fec431322d8ce47d62793985a5b498ab22a Mon Sep 17 00:00:00 2001 From: Chris Hall Date: Tue, 6 Dec 2011 16:03:59 +1300 Subject: [PATCH] bug 7239 fix to avoid error being thrown even though a record is created Signed-off-by: Katrin Fischer When creating an item in acquisitions while ordering and not filling out any fields, there is no longer shown a perl error message. Signed-off-by: Paul Poulain --- C4/Biblio.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/C4/Biblio.pm b/C4/Biblio.pm index 52119ea990..ac78ae379e 100644 --- a/C4/Biblio.pm +++ b/C4/Biblio.pm @@ -2077,7 +2077,7 @@ sub TransformHtmlToXml { } $prevtag = @$tags[$i]; } - $xml .= "\n" if @$tags > 0; + $xml .= "\n" if $xml =~ m/preference('marcflavour') eq 'UNIMARC' and !$unimarc_and_100_exist ) { # warn "SETTING 100 for $auth_type"; -- 2.39.5