loncom/localize/lonlocal.pm - diff

Return to lonlocal.pm CVS log

Up to [LON-CAPA] / loncom / localize

version 1.60, 2009/10/01 20:22:33	version 1.61, 2010/07/07 16:30:48
Line 295 sub get_genlanguages {	Line 295 sub get_genlanguages {

sub current_encoding {	sub current_encoding {
my $default='UTF-8';	my $default='UTF-8';
# UTF-8 character encoding needed for the whole LON-CAPA system	unless ($Apache::lonnet::env{'browser.unicode'}) {
# (interface language and homework problem content)	if ($Apache::lonnet::env{'browser.os'} eq 'win' &&
# See Bugzilla 5702 vs. 2189 and 4067	$Apache::lonnet::env{'browser.type'} eq 'explorer') {
# if ($Apache::lonnet::env{'browser.os'} eq 'win' &&	$default='ISO-8859-1';
# $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);