version 1.18, 2006/04/26 14:10:58
|
version 1.19, 2006/04/26 14:43:03
|
Line 1393 sub blockcheck {
|
Line 1393 sub blockcheck {
|
# for students. |
# for students. |
return if (!%live_courses); |
return if (!%live_courses); |
|
|
&Apache::lonnet::logthis("hmm"); |
|
&Apache::lonnet::logthis(join(" ",%live_courses)); |
|
&Apache::lonnet::logthis(join(" ",%staff_of)); |
|
|
|
foreach my $course (keys(%live_courses)) { |
foreach my $course (keys(%live_courses)) { |
my ($cdom,$cnum) = split(/_/,$course); |
my $cdom = $env{'course.'.$course.'.domain'}; |
|
my $cnum = $env{'course.'.$course.'.num'}; |
|
|
# if they are a staff member and are currently not playing student |
# if they are a staff member and are currently not playing student |
next if ( $staff_of{$course} |
next if ( $staff_of{$course} |