|
version 1.127, 2005/04/07 06:56:23
|
version 1.128, 2005/04/07 07:34:52
|
|
Line 2208 sub upfile_drop_add {
|
Line 2208 sub upfile_drop_add {
|
| sub drop_student_list { |
sub drop_student_list { |
| my $r=shift; |
my $r=shift; |
| my $count=0; |
my $count=0; |
| my @droplist; |
my @droplist = &Apache::loncommon::get_env_multiple('form.droplist'); |
| if (ref($env{'form.droplist'})) { |
|
| @droplist = @{$env{'form.droplist'}}; |
|
| } else { |
|
| @droplist = ($env{'form.droplist'}); |
|
| } |
|
| foreach (@droplist) { |
foreach (@droplist) { |
| my ($uname,$udom)=split(/\:/,$_); |
my ($uname,$udom)=split(/\:/,$_); |
| # drop student |
# drop student |
![[BACK]](/icons/back.gif){kind=icon}
Return to londropadd.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface