--- loncom/interface/lonpickcourse.pm 2005/11/15 20:46:40 1.35 +++ loncom/interface/lonpickcourse.pm 2005/12/15 23:31:32 1.36 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a course # -# $Id: lonpickcourse.pm,v 1.35 2005/11/15 20:46:40 raeburn Exp $ +# $Id: lonpickcourse.pm,v 1.36 2005/12/15 23:31:32 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -149,7 +149,7 @@ ENDDOCUMENT my $roledom = $env{'form.roleelement'}; if ($roledom) { $roleelement = ''; - $submitopener = &Apache::lonroles::processpick($roledom); + $submitopener = &Apache::lonroles::processpick(); $autosubmit = 'process_pick("'.$roledom.'")'; } $r->print(<print(''."\n". ''."\n". ''."\n". - ''."\n". - ''); + ''."\n"); + if ((exists($env{'form.roleelement'})) && ($env{'form.form'} eq 'rolechoice')) { + $r->print(''."\n"); + } + $r->print("\n"); } $r->print(''); return OK;