loncom/interface/lonpreferences.pm - diff

Return to lonpreferences.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.202, 2013/01/04 00:23:31	version 1.203, 2013/01/18 12:58:42
Line 159 sub languagechanger {	Line 159 sub languagechanger {
my $language=$userenv{'languages'};	my $language=$userenv{'languages'};

my $pref=&mt('Preferred language');	my $pref=&mt('Preferred language');
my %langchoices=('' => 'No language preference');	my %langchoices=('' => &mt('No language preference'));
foreach (&Apache::loncommon::languageids()) {	foreach (&Apache::loncommon::languageids()) {
if (&Apache::loncommon::supportedlanguagecode($_)) {	if (&Apache::loncommon::supportedlanguagecode($_)) {
$langchoices{&Apache::loncommon::supportedlanguagecode($_)}	$langchoices{&Apache::loncommon::supportedlanguagecode($_)}