--- loncom/interface/lonparmset.pm 2003/04/30 15:49:45 1.88 +++ loncom/interface/lonparmset.pm 2003/07/24 17:53:59 1.118 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set parameters for assessments # -# $Id: lonparmset.pm,v 1.88 2003/04/30 15:49:45 matthew Exp $ +# $Id: lonparmset.pm,v 1.118 2003/07/24 17:53:59 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -285,8 +285,8 @@ sub plink { sub startpage { - my ($r,$id,$udom,$csec,$uname)=@_; - + my ($r,$id,$udom,$csec,$uname,$have_assesments)=@_; + my $bodytag=&Apache::loncommon::bodytag('Set Course Parameters','', 'onUnload="pclose()"'); my $chooseopt=&Apache::loncommon::select_dom_form($udom,'udom').' '. @@ -341,12 +341,24 @@ sub startpage { $selscript $bodytag +
+