--- loncom/interface/lonsimplepage.pm 2006/10/23 18:48:47 1.48 +++ loncom/interface/lonsimplepage.pm 2006/12/11 03:49:12 1.49 @@ -1,7 +1,7 @@ # The LearningOnline Network # Simple Page Editor # -# $Id: lonsimplepage.pm,v 1.48 2006/10/23 18:48:47 albertel Exp $ +# $Id: lonsimplepage.pm,v 1.49 2006/12/11 03:49:12 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -150,8 +150,13 @@ sub handler { $r->print(&grouppage_breadcrumbs($dom,$crs,$group,$group_desc)); } if ((!$group_home_edit) && (!$group_home_view) && - (!$group_view_perm) && (!$group_edit_perm)) { + (!$group_view_perm) && (!$group_edit_perm)) { &display_group_links($r,$target,$group,'view',$refarg,%groupinfo); + if ($env{'form.grade_target'} ne 'tex') { + $r->print(&Apache::loncommon::end_page()); + } else { + $r->print('\end{document}'); + } return OK; } } else { @@ -165,6 +170,13 @@ sub handler { } return OK; } + my ($blocked,$blocktext) = + &Apache::loncommon::blocking_status('groups'); + if ($blocked) { + $r->print($blocktext); + $r->print(&Apache::loncommon::end_page()); + return OK; + } } my $allowed;