From bb4ef63cb791b1f9ee046b5e15a829ff17b91ae4 Mon Sep 17 00:00:00 2001 From: dbs Date: Fri, 16 Apr 2010 15:05:52 +0000 Subject: [PATCH] Forward-port r16250: Decode input, encode output. That's what Perl Unicode advice says, and it happens to fix a problem for Indiana. Tested on Conifer production, no problems were introduced. git-svn-id: svn://svn.open-ils.org/ILS/trunk@16252 dcc99617-32d9-48b4-a31d-7c20da2025e4 --- Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm index 356908debb..36809bc897 100644 --- a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm +++ b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm @@ -1791,7 +1791,8 @@ sub sru_search { ) ); - $marcxml = $marc->as_xml_record(); + # Ensure the data is encoded as UTF8 before we hand it off + $marcxml = encode_utf8($marc->as_xml_record()); $marcxml =~ s/^<\?xml version="1.0" encoding="UTF-8"\?>//o; } -- 2.11.0