--- loncom/interface/Attic/londropadd.pm 2005/04/07 06:56:23 1.127 +++ loncom/interface/Attic/londropadd.pm 2005/04/07 07:34:52 1.128 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to drop and add students in courses # -# $Id: londropadd.pm,v 1.127 2005/04/07 06:56:23 albertel Exp $ +# $Id: londropadd.pm,v 1.128 2005/04/07 07:34:52 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2208,12 +2208,7 @@ sub upfile_drop_add { sub drop_student_list { my $r=shift; my $count=0; - my @droplist; - if (ref($env{'form.droplist'})) { - @droplist = @{$env{'form.droplist'}}; - } else { - @droplist = ($env{'form.droplist'}); - } + my @droplist = &Apache::loncommon::get_env_multiple('form.droplist'); foreach (@droplist) { my ($uname,$udom)=split(/\:/,$_); # drop student