From 6eeccad30530ca5cf32f7385310cd23af13f8610 Mon Sep 17 00:00:00 2001
From: Henri-Damien LAURENT <henridamien@koha-fr.org>
Date: Tue, 16 Oct 2007 16:02:33 -0500
Subject: [PATCH] Bug Fixing ISBD parser had problems with commas

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 catalogue/ISBDdetail.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/catalogue/ISBDdetail.pl b/catalogue/ISBDdetail.pl
index 72f6b5e5dd..84015113cf 100755
--- a/catalogue/ISBDdetail.pl
+++ b/catalogue/ISBDdetail.pl
@@ -141,7 +141,7 @@ foreach my $isbdfield ( split /#/, $bloc ) {
                         $subf[$i][1], '', $dbh );
                     my $tagsubf = $tag . $subfieldcode;
                     $calculated =~
-s/\{(.?.?.?)$tagsubf(.*?)\}/$1$subfieldvalue\{$1$tagsubf$2\}$2/g;
+s/\{(.?.?.?)$tagsubf(.*?)\}/$1$subfieldvalue$2\{$1$tagsubf$2\}/g;
                 }
 
                 # field builded, store the result
-- 
2.39.5