loncom/localize/lonlocal.pm - diff

Return to lonlocal.pm CVS log

Up to [LON-CAPA] / loncom / localize

version 1.36, 2005/11/14 19:53:03	version 1.37, 2005/11/15 19:07:58
Line 251 sub get_language_handle {	Line 251 sub get_language_handle {
my @languages=&Apache::loncommon::preferred_languages;	my @languages=&Apache::loncommon::preferred_languages;
$ENV{'HTTP_ACCEPT_LANGUAGE'}='';	$ENV{'HTTP_ACCEPT_LANGUAGE'}='';
$lh=Apache::localize->get_handle(@languages);	$lh=Apache::localize->get_handle(@languages);
if ($r && &Apache::lonnet::mod_perl_version == 1) {	if ($r) {
$r->content_languages([&current_language()]);	$r->content_languages([&current_language()]);
}	}
### setlocale(LC_ALL,&current_locale);	### setlocale(LC_ALL,&current_locale);