From d63c509765f720fbc3fac0f52642aa15c298bc8e Mon Sep 17 00:00:00 2001
From: tgarip1957 <tgarip1957>
Date: Sat, 15 Apr 2006 02:37:03 +0000
Subject: [PATCH] Marc record should be set to UTF-8 in leader.Force it. XML
 should be with<record> wrappers

---
 updater/updatedatabase | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/updater/updatedatabase b/updater/updatedatabase
index 99ac0af0ea..02629603f0 100755
--- a/updater/updatedatabase
+++ b/updater/updatedatabase
@@ -1284,8 +1284,10 @@ unless ($marcdone) {
 	my $totaldone=0;
 	while (my ($bibid,$biblionumber) = $sth->fetchrow) {
 		my $record = MARCgetbiblio($dbh,$bibid);
+	#Force UTF-8 in record leader
+		$record->encoding('UTF-8');
 		print $record->as_formatted if ($biblionumber==3902);
-		$sth_update->execute($record->as_usmarc(),$record->as_xml(),$biblionumber);
+		$sth_update->execute($record->as_usmarc(),$record->as_xml_record(),$biblionumber);
 		$totaldone++;
 		print "\r$totaldone / $totaltodo" unless ($totaldone % 100);
 	}
@@ -1503,6 +1505,10 @@ sub MARCgetitem {
 exit;
 
 # $Log$
+# Revision 1.135  2006/04/15 02:37:03  tgarip1957
+# Marc record should be set to UTF-8 in leader.Force it.
+# XML should be with<record> wrappers
+#
 # Revision 1.134  2006/04/14 09:37:29  tipaul
 # improvements from SAN Ouest Provence :
 # * introducing a category_type into categories. It can be A (adult), C (children), P (Professionnal), I (institution/organisation).
-- 
2.39.5