From a6ebdeadcfcc5e1de76b61250934e9358d906e68 Mon Sep 17 00:00:00 2001
From: dbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 15 Apr 2010 20:09:01 +0000
Subject: [PATCH] Teach SuperCat about locales - this becomes important when
 requesting copy status, etc

git-svn-id: svn://svn.open-ils.org/ILS/trunk@16244 dcc99617-32d9-48b4-a31d-7c20da2025e4
---
 Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
index b2fc07599e..95d0249a14 100644
--- a/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
+++ b/Open-ILS/src/perlmods/OpenILS/WWW/SuperCat.pm
@@ -323,6 +323,9 @@ sub unapi {
 	my $skin = $cgi->param('skin') || 'default';
 	my $locale = $cgi->param('locale') || 'en-US';
 
+	# Enable localized results of copy status, etc
+	$supercat->session_locale($locale);
+
 	my $format = $cgi->param('format');
 	my $flesh_feed = parse_feed_type($format);
 	(my $base_format = $format) =~ s/(-full|-uris)$//o;
@@ -606,6 +609,9 @@ sub supercat {
 
 	my $skin = $cgi->param('skin') || 'default';
 	my $locale = $cgi->param('locale') || 'en-US';
+
+	# Enable localized results of copy status, etc
+	$supercat->session_locale($locale);
 	
 	if ( $path =~ m{^/formats(?:/([^\/]+))?$}o ) {
 		print "Content-type: application/xml; charset=utf-8\n";
@@ -844,6 +850,9 @@ sub bookbag_feed {
 	my $locale = $cgi->param('locale') || 'en-US';
 	my $org = $cgi->param('searchOrg');
 
+	# Enable localized results of copy status, etc
+	$supercat->session_locale($locale);
+
 	my $org_unit = get_ou($org);
 	my $scope = "l=" . $org_unit->[0]->id . "&";
 
@@ -926,6 +935,9 @@ sub changes_feed {
 	my $locale = $cgi->param('locale') || 'en-US';
 	my $org = $cgi->param('searchOrg');
 
+	# Enable localized results of copy status, etc
+	$supercat->session_locale($locale);
+
 	my $org_unit = get_ou($org);
 	my $scope = "l=" . $org_unit->[0]->id . "&";
 
-- 
2.11.0