version 1.27, 2006/05/17 14:58:28
|
version 1.28, 2006/05/23 21:42:09
|
Line 264 sub discourse {
|
Line 264 sub discourse {
|
my ($course_personnel, |
my ($course_personnel, |
$current_members, |
$current_members, |
$expired_members, |
$expired_members, |
$future_members) = &Apache::lonselstudent::get_people_in_class(); |
$future_members) = |
|
&Apache::lonselstudent::get_people_in_class($env{'request.course.sec'}); |
unshift @$current_members, (@$course_personnel); |
unshift @$current_members, (@$course_personnel); |
my %defaultUsers; |
my %defaultUsers; |
|
|
Line 274 sub discourse {
|
Line 275 sub discourse {
|
\%defaultUsers, |
\%defaultUsers, |
1,"selectedusers",1); |
1,"selectedusers",1); |
|
|
|
$result .= &Apache::lonselstudent::render_student_list($expired_members, |
|
"compemail", |
|
"expired", |
|
\%defaultUsers, |
|
1, "selectedusers",0); |
|
$result .= &Apache::lonselstudent::render_student_list($future_members, |
|
"compemail", |
|
"future", |
|
\%defaultUsers, |
|
1, "selectedusers", 0); |
return $result; |
return $result; |
} |
} |
|
|