|
version 1.402, 2014/06/13 11:22:41
|
version 1.403, 2014/06/30 14:49:35
|
|
Line 3044 sub update_user_data {
|
Line 3044 sub update_user_data {
|
| my %newenvhash; |
my %newenvhash; |
| foreach my $key (keys(%changed)) { |
foreach my $key (keys(%changed)) { |
| if (($key eq 'official') || ($key eq 'unofficial') |
if (($key eq 'official') || ($key eq 'unofficial') |
| || ($key eq 'community')) { |
|| ($key eq 'community') || ($key eq 'textbook')) { |
| $newenvhash{'environment.requestcourses.'.$key} = |
$newenvhash{'environment.requestcourses.'.$key} = |
| $changeHash{'requestcourses.'.$key}; |
$changeHash{'requestcourses.'.$key}; |
| if ($changeHash{'requestcourses.'.$key}) { |
if ($changeHash{'requestcourses.'.$key}) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncreateuser.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface