honor the locale cookie before the standard headers

git-svn-id: svn://svn.open-ils.org/ILS/trunk@13097 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm b/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm
index 073743c..dccf40c 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm
+++ b/Open-ILS/src/perlmods/OpenILS/WWW/EGWeb.pm
@@ -72,8 +72,8 @@ sub load_context {
     $ctx->{skin} = $cgi->cookie(OILS_HTTP_COOKIE_SKIN) || 'default';
     $ctx->{theme} = $cgi->cookie(OILS_HTTP_COOKIE_THEME) || 'default';
     $ctx->{locale} = 
-        $r->headers_in->get('Accept-Language') || # this will need some trimming
-        $cgi->cookie(OILS_HTTP_COOKIE_LOCALE) || 'en-US';
+        $cgi->cookie(OILS_HTTP_COOKIE_LOCALE) || 
+        $r->headers_in->get('Accept-Language') || 'en-US'; #  this will need some trimming
     $r->log->debug('skin = ' . $ctx->{skin} . ' : theme = ' . 
         $ctx->{theme} . ' : locale = ' . $ctx->{locale});
     return $ctx;