Avoid data loss by setting MARC::Charset->assume_unicode(1)
[evergreen-equinox.git] / Open-ILS / src / sql / Pg / 030.schema.metabib.sql
index 2f6539f..5dc4761 100644 (file)
@@ -430,6 +430,9 @@ CREATE OR REPLACE FUNCTION biblio.flatten_marc ( TEXT ) RETURNS SETOF metabib.fu
 
 use MARC::Record;
 use MARC::File::XML (BinaryEncoding => 'UTF-8');
+use MARC::Charset;
+
+MARC::Charset->assume_unicode(1);
 
 my $xml = shift;
 my $r = MARC::Record->new_from_xml( $xml );