[open-ils-commits] r16251 - branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW (dbs)

[svn at svn.open-ils.org]

Author: dbs
Date: 2010-04-16 11:04:15 -0400 (Fri, 16 Apr 2010)
New Revision: 16251

Modified:
   branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
Log:
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.


Modified: branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
===================================================================
--- branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2010-04-16 15:02:46 UTC (rev 16250)
+++ branches/rel_1_6/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm	2010-04-16 15:04:15 UTC (rev 16251)
@@ -1718,7 +1718,8 @@
 					)
 				);
 
-				$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;
 
 			}