bugfixing batchupdateISBN.pl

pls, someone from MARC21 confirm.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/misc/batchupdateISBNs.pl b/misc/batchupdateISBNs.pl
index 2752aab..03d5bba 100755 (executable)
--- a/misc/batchupdateISBNs.pl
+++ b/misc/batchupdateISBNs.pl
@@ -127,7 +127,7 @@ if(not $no_marcxml){
                 }
            }
             if($flag){
-                $marcxml = $record->as_xml;
+                $marcxml = $record->as_xml_record('UNIMARC');
                 # Update
                 my $sth = $dbh->prepare($update_marcxml);
                 $sth->execute($marcxml,$biblioitemnumber);