version 1.38, 2006/04/10 19:59:54
|
version 1.39, 2006/05/09 14:38:10
|
Line 70 sub handler {
|
Line 70 sub handler {
|
if ($caller eq 'grppg') { |
if ($caller eq 'grppg') { |
$marker =~ s/\W//g; |
$marker =~ s/\W//g; |
$namespace = 'grppage_'.$marker; |
$namespace = 'grppage_'.$marker; |
my %curr_groups; |
my %curr_groups = &Apache::loncommon::coursegroups($dom,$crs,$marker); |
if (!&Apache::loncommon::coursegroups(\%curr_groups,$dom,$crs,$marker)) { |
if (!%curr_groups) { |
&Apache::loncommon::simple_error_page($r,'','Invalid group name'); |
&Apache::loncommon::simple_error_page($r,'','Invalid group name'); |
return OK; |
return OK; |
} |
} |