loncom/localize/lonlocal.pm - diff

Return to lonlocal.pm CVS log

Up to [LON-CAPA] / loncom / localize

version 1.55, 2009/02/05 10:39:09	version 1.56, 2009/03/20 18:26:34
Line 303 sub get_genlanguages {	Line 303 sub get_genlanguages {

sub current_encoding {	sub current_encoding {
my $default='UTF-8';	my $default='UTF-8';
if ($Apache::lonnet::env{'browser.os'} eq 'win' &&	# UTF-8 character encoding needed for the whole LON-CAPA system
$Apache::lonnet::env{'browser.type'} eq 'explorer') {	# (interface language and homework problem content)
$default='ISO-8859-1';	# See Bugzilla 5702 vs. 2189 and 4067
}	# if ($Apache::lonnet::env{'browser.os'} eq 'win' &&
	# $Apache::lonnet::env{'browser.type'} eq 'explorer') {
	# $default='ISO-8859-1';
	# }
if ($lh) {	if ($lh) {
my $enc=$lh->maketext('char_encoding');	my $enc=$lh->maketext('char_encoding');
return ($enc eq 'char_encoding'?$default:$enc);	return ($enc eq 'char_encoding'?$default:$enc);