|
version 1.220, 2009/01/04 16:20:27
|
version 1.221, 2009/01/05 20:04:40
|
|
Line 1032 sub user_lang {
|
Line 1032 sub user_lang {
|
| @userlangs=(@userlangs,split(/\s*(\,|\;|\:)\s*/, |
@userlangs=(@userlangs,split(/\s*(\,|\;|\:)\s*/, |
| $env{'course.'.$fromcid.'.languages'})); |
$env{'course.'.$fromcid.'.languages'})); |
| } else { |
} else { |
| my %langhash = &Apache::loncommon::getlangs($toudom,$touname); |
my %langhash = &Apache::loncommon::getlangs($touname,$toudom); |
| if ($langhash{'languages'} ne '') { |
if ($langhash{'languages'} ne '') { |
| @userlangs = split(/\s*(\,|\;|\:)\s*/,$langhash{'languages'}); |
@userlangs = split(/\s*(\,|\;|\:)\s*/,$langhash{'languages'}); |
| } else { |
} else { |
| my %domdefs = &Apache::lonnet::get_domain_defaults($toudom); |
my %domdefs = &Apache::lonnet::get_domain_defaults($toudom); |
| if ($domdefs{'lang_def'} ne '') { |
if ($domdefs{'lang_def'} ne '') { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonmsg.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface