--- loncom/interface/lonparmset.pm	2003/06/04 18:24:33	1.97
+++ loncom/interface/lonparmset.pm	2003/06/06 02:24:49	1.98
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set parameters for assessments
 #
-# $Id: lonparmset.pm,v 1.97 2003/06/04 18:24:33 albertel Exp $
+# $Id: lonparmset.pm,v 1.98 2003/06/06 02:24:49 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -58,7 +58,6 @@ use Apache::lonnet;
 use Apache::Constants qw(:common :http REDIRECT);
 use Apache::lonhtmlcommon();
 use Apache::loncommon;
-use Apache::lonmenu;
 use GDBM_File;
 use Apache::lonhomework;
 use Apache::lonxml;
@@ -288,12 +287,8 @@ sub plink {
 sub startpage {
     my ($r,$id,$udom,$csec,$uname)=@_;
  
-    my $bodytag=&Apache::lonmenu::registerurl().
-                &Apache::loncommon::bodytag('Set Course Parameters','',
-                                            'onUnload="'.
-       &Apache::lonmenu::unloadevents().';pclose();" onLoad="'.
-       &Apache::lonmenu::loadevents().'"').
-       &Apache::lonmenu::regflush();
+    my $bodytag=&Apache::loncommon::bodytag('Set Course Parameters','',
+                                            'onUnload="pclose()"');
     my $chooseopt=&Apache::loncommon::select_dom_form($udom,'udom').' '.
         &Apache::loncommon::selectstudent_link('parmform','uname','udom');
     my $selscript=&Apache::loncommon::studentbrowser_javascript();