version 1.50.2.2, 2009/01/05 16:55:04
|
version 1.50.4.2, 2009/09/14 22:34:41
|
Line 234 sub current_language {
|
Line 234 sub current_language {
|
} |
} |
|
|
sub preferred_languages { |
sub preferred_languages { |
|
return ('gci'); |
my @languages=(); |
my @languages=(); |
if (($Apache::lonnet::env{'request.role.adv'}) && ($Apache::lonnet::env{'form.languages'})) { |
if (($Apache::lonnet::env{'request.role.adv'}) && ($Apache::lonnet::env{'form.languages'})) { |
@languages=(@languages,split(/\s*(\,|\;|\:)\s*/,$Apache::lonnet::env{'form.languages'})); |
@languages=(@languages,split(/\s*(\,|\;|\:)\s*/,$Apache::lonnet::env{'form.languages'})); |