|
version 1.11, 2006/07/28 18:44:27
|
version 1.12, 2006/07/29 00:31:58
|
|
Line 232 sub group_changes {
|
Line 232 sub group_changes {
|
| my $courseid = $cid; |
my $courseid = $cid; |
| $courseid =~ s|^/||; |
$courseid =~ s|^/||; |
| $courseid =~ s|/|_|; |
$courseid =~ s|/|_|; |
| if ($role =~ /^cr/) { |
|
| $role =~ s/\//_/g; |
|
| } |
|
| my %crshash=&Apache::lonnet::coursedescription($cid); |
my %crshash=&Apache::lonnet::coursedescription($cid); |
| $cdom = $crshash{'domain'}; |
$cdom = $crshash{'domain'}; |
| $cnum = $crshash{'num'}; |
$cnum = $crshash{'num'}; |
![[BACK]](/icons/back.gif){kind=icon}
Return to longroup.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface