loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.119, 2003/09/17 16:50:58	version 1.121, 2003/09/19 15:06:42
Line 1661 sub preferred_languages {	Line 1661 sub preferred_languages {
push (@genlanguages,(split(/(\-\|\_)/,$_))[0]);	push (@genlanguages,(split(/(\-\|\_)/,$_))[0]);
}	}
}	}
&Apache::lonnet::logthis('Lang: '.join(',',@genlanguages));
return @genlanguages;	return @genlanguages;
}	}

	sub current_language {
	return (&preferred_languages)[0];
	}

###############################################################	###############################################################
## Student Answer Attempts ##	## Student Answer Attempts ##
###############################################################	###############################################################