--- loncom/interface/loncreatecourse.pm 2003/03/24 14:45:09 1.18 +++ loncom/interface/loncreatecourse.pm 2003/04/22 21:00:42 1.20 @@ -1,7 +1,7 @@ # The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.18 2003/03/24 14:45:09 www Exp $ +# $Id: loncreatecourse.pm,v 1.20 2003/04/22 21:00:42 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -231,10 +231,6 @@ ENDENHEAD $envflag=1; $cenv{'question.email'}=$ccuname.':'.$ccdomain; } - if ($ENV{'form.keys'}) { - $envflag=1; - $cenv{'question.email'}=$ccuname.':'.$ccdomain; - } } if ($ENV{'form.setkeys'}) { $envflag=1; @@ -297,7 +293,11 @@ ENDENHEAD $ccuname.' at '.$ccdomain.': '. &Apache::lonnet::assignrole($ccdomain,$ccuname,$courseid,'cc').'
'); } - $r->print('Roles will be active at next login.