version 1.36, 2006/03/29 20:07:00
|
version 1.37, 2006/04/07 21:56:02
|
Line 52 sub handler {
|
Line 52 sub handler {
|
# Is this even in a course? |
# Is this even in a course? |
unless ($env{'request.course.id'}) { |
unless ($env{'request.course.id'}) { |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
return &Apache::loncommon::simple_error_page($r,'', |
&Apache::loncommon::simple_error_page($r,'','Not in a course'); |
'Not in a course'); |
|
} else { |
} else { |
$r->print('\textbf{Not in a course}\end{document}'); |
$r->print('\textbf{Not in a course}\end{document}'); |
} |
} |
|
return OK; |
} |
} |
|
|
my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
Line 72 sub handler {
|
Line 72 sub handler {
|
$namespace = 'grppage_'.$marker; |
$namespace = 'grppage_'.$marker; |
my %curr_groups; |
my %curr_groups; |
if (!&Apache::loncommon::coursegroups(\%curr_groups,$dom,$crs,$marker)) { |
if (!&Apache::loncommon::coursegroups(\%curr_groups,$dom,$crs,$marker)) { |
return &Apache::loncommon::simple_error_page($r,'', |
&Apache::loncommon::simple_error_page($r,'','Invalid group name'); |
'Invalid group name'); |
return OK; |
} |
} |
%groupinfo = |
%groupinfo = |
&Apache::loncommon::get_group_settings($curr_groups{$marker}); |
&Apache::loncommon::get_group_settings($curr_groups{$marker}); |
Line 83 sub handler {
|
Line 83 sub handler {
|
} |
} |
|
|
if (!$marker) { |
if (!$marker) { |
return &Apache::loncommon::simple_error_page($r,'','Invalid call'); |
&Apache::loncommon::simple_error_page($r,'','Invalid call'); |
|
return OK; |
} |
} |
|
|
# --------------------------------------------------------- The syllabus fields |
# --------------------------------------------------------- The syllabus fields |