![[BACK]](/icons/back.gif){kind=icon}
Return to lonroles.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth|
Return to lonroles.pm CVS log | Up to [LON-CAPA] / loncom / auth |
| version 1.198, 2008/07/05 17:50:57 | version 1.199, 2008/07/05 23:27:34 |
|---|---|
| Line 1088 sub adhoc_course_role { | Line 1088 sub adhoc_course_role { |
| my $custom_role = $2; | my $custom_role = $2; |
| my $usec = $3; | my $usec = $3; |
| if ($role eq 'cr') { | if ($role eq 'cr') { |
| if ($custom_role =~ m-^$match_domain/$match_courseid/\w+$-) { | if ($custom_role =~ m-^/$match_domain/$match_username/\w+$-) { |
| $role .= $custom_role; | $role .= $custom_role; |
| } else { | } else { |
| return; | return; |