loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.1111, 2013/01/15 17:37:45	version 1.1112, 2013/01/18 12:58:42
Line 993 sub select_language {	Line 993 sub select_language {
my ($name,$selected,$includeempty) = @_;	my ($name,$selected,$includeempty) = @_;
my %langchoices;	my %langchoices;
if ($includeempty) {	if ($includeempty) {
%langchoices = ('' => 'No language preference');	%langchoices = ('' => &mt('No language preference'));
}	}
foreach my $id (&languageids()) {	foreach my $id (&languageids()) {
my $code = &supportedlanguagecode($id);	my $code = &supportedlanguagecode($id);