|
version 1.51, 2007/07/13 00:29:21
|
version 1.52, 2007/09/10 19:22:22
|
|
Line 91 sub handler {
|
Line 91 sub handler {
|
| my %curr_group = (); |
my %curr_group = (); |
| my %groupinfo = (); |
my %groupinfo = (); |
| if ($db_name =~ /^grppage_/) { |
if ($db_name =~ /^grppage_/) { |
| my ($group)=(split(m{/},$r->uri))[4]; |
$group = (split(m{/},$r->uri))[4]; |
| $group =~ s/\W//g; |
$group =~ s/\W//g; |
| my %curr_groups = &Apache::longroup::coursegroups($dom,$crs,$group); |
my %curr_groups = &Apache::longroup::coursegroups($dom,$crs,$group); |
| if (!%curr_groups) { |
if (!%curr_groups) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonsimplepage.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface