--- loncom/interface/lonsimplepage.pm 2006/03/29 20:07:00 1.36 +++ loncom/interface/lonsimplepage.pm 2006/04/07 21:56:02 1.37 @@ -1,7 +1,7 @@ # The LearningOnline Network # Simple Page Editor # -# $Id: lonsimplepage.pm,v 1.36 2006/03/29 20:07:00 raeburn Exp $ +# $Id: lonsimplepage.pm,v 1.37 2006/04/07 21:56:02 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -52,11 +52,11 @@ sub handler { # Is this even in a course? unless ($env{'request.course.id'}) { if ($target ne 'tex') { - return &Apache::loncommon::simple_error_page($r,'', - 'Not in a course'); + &Apache::loncommon::simple_error_page($r,'','Not in a course'); } else { $r->print('\textbf{Not in a course}\end{document}'); } + return OK; } my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'}; @@ -72,8 +72,8 @@ sub handler { $namespace = 'grppage_'.$marker; my %curr_groups; if (!&Apache::loncommon::coursegroups(\%curr_groups,$dom,$crs,$marker)) { - return &Apache::loncommon::simple_error_page($r,'', - 'Invalid group name'); + &Apache::loncommon::simple_error_page($r,'','Invalid group name'); + return OK; } %groupinfo = &Apache::loncommon::get_group_settings($curr_groups{$marker}); @@ -83,7 +83,8 @@ sub handler { } if (!$marker) { - return &Apache::loncommon::simple_error_page($r,'','Invalid call'); + &Apache::loncommon::simple_error_page($r,'','Invalid call'); + return OK; } # --------------------------------------------------------- The syllabus fields