From c846ed00db1e85d2dfe82bf99ecd494ac51bfe1b Mon Sep 17 00:00:00 2001
From: Mason James <mtj@liblime.com>
Date: Mon, 12 Nov 2007 12:13:18 -0600
Subject: [PATCH] utf8 handling fixes 'Wide character in print at' encoding
 errors.

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

diff --git a/misc/migration_tools/rebuild_zebra_idx.pl b/misc/migration_tools/rebuild_zebra_idx.pl
index ecc0909a13..2ed7a1fe41 100755
--- a/misc/migration_tools/rebuild_zebra_idx.pl
+++ b/misc/migration_tools/rebuild_zebra_idx.pl
@@ -42,7 +42,7 @@ my $i=0;
 while ((my $biblionumber) = $sth->fetchrow) {
 	my $record = GetMarcBiblio($biblionumber);
 	my $filename = $cgidir."/tmp/BIBLIO".$biblionumber.".iso2709";
-	open F,"> $filename";
+	open F,">:utf8", $filename;
     eval {print F $record->as_usmarc(); };
     warn "ERROR: writing biblio $biblionumber failed" if $@;
 	close F;
-- 
2.39.5