--- loncom/interface/lonsimplepage.pm 2006/04/07 21:56:02 1.37 +++ loncom/interface/lonsimplepage.pm 2006/05/09 14:38:10 1.39 @@ -1,7 +1,7 @@ # The LearningOnline Network # Simple Page Editor # -# $Id: lonsimplepage.pm,v 1.37 2006/04/07 21:56:02 albertel Exp $ +# $Id: lonsimplepage.pm,v 1.39 2006/05/09 14:38:10 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -70,8 +70,8 @@ sub handler { if ($caller eq 'grppg') { $marker =~ s/\W//g; $namespace = 'grppage_'.$marker; - my %curr_groups; - if (!&Apache::loncommon::coursegroups(\%curr_groups,$dom,$crs,$marker)) { + my %curr_groups = &Apache::loncommon::coursegroups($dom,$crs,$marker); + if (!%curr_groups) { &Apache::loncommon::simple_error_page($r,'','Invalid group name'); return OK; } @@ -100,17 +100,11 @@ sub handler { # ------------------------------------------------------------ Get query string &Apache::loncommon::get_unprocessed_cgi ($ENV{'QUERY_STRING'},['forcestudent','forceedit','register']); -# ----------------------------------------------------- Force menu registration - my $addentries=''; - if ($env{'form.register'}) { - $addentries=' onLoad="'.&Apache::lonmenu::loadevents(). - '" onUnload="'.&Apache::lonmenu::unloadevents().'"'; - } # --------------------------------------------------------------- Force Student my $forcestudent=''; if ($env{'form.forcestudent'} || $target eq 'tex' ) { $forcestudent='student'; }; - my $forceedit=''; - if ($env{'form.forceedit'}) { $forceedit='edit'; } + my $forceedit=''; + if ($env{'form.forceedit'}) { $forceedit='edit'; } my %syllabus=&Apache::lonnet::dump($namespace,$dom,$crs); @@ -125,7 +119,6 @@ sub handler { my $start_page = &Apache::loncommon::start_page($title,undef, {'function' => $forcestudent, - 'add_entries' => $addentries, 'domain' => $dom, 'force_register' => $env{'form.register'},});