From 7e895a17a36b68667aa5eb17ba76ba93a411b368 Mon Sep 17 00:00:00 2001
From: Nahuel ANGELINETTI <nahuel.angelinetti@biblibre.com>
Date: Tue, 15 Sep 2009 13:54:17 +0200
Subject: [PATCH] Fix unimarc 010 field plugin

It cleans ISBN
---
 cataloguing/value_builder/unimarc_field_010.pl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/cataloguing/value_builder/unimarc_field_010.pl b/cataloguing/value_builder/unimarc_field_010.pl
index 8b60026bf6..f4f4511b16 100755
--- a/cataloguing/value_builder/unimarc_field_010.pl
+++ b/cataloguing/value_builder/unimarc_field_010.pl
@@ -91,6 +91,8 @@ sub plugin {
     my $len = 0;
     my $sth = $dbh->prepare('SELECT publishercode FROM biblioitems WHERE isbn LIKE ? OR isbn LIKE ? LIMIT 1');
     
+    $isbn =~ s/-//g;
+    warn $isbn;
     if (length ($isbn) == 13){
         $isbn = substr($isbn, 3, length($isbn)-3);
     }
-- 
2.20.1