version 1.74, 2004/01/13 02:31:09
|
version 1.75, 2004/01/28 16:10:26
|
Line 55 use Apache::lonlocal;
|
Line 55 use Apache::lonlocal;
|
|
|
sub list_discussion { |
sub list_discussion { |
my ($mode,$status,$symb)=@_; |
my ($mode,$status,$symb)=@_; |
|
&Apache::lonnet::logthis("status is $status"); |
|
if (!($status eq 'CAN_ANSWER' || $status eq 'CANNOT_ANSWER')) { |
|
return ''; |
|
} |
my $discussiononly=0; |
my $discussiononly=0; |
if ($mode eq 'board') { $discussiononly=1; } |
if ($mode eq 'board') { $discussiononly=1; } |
unless ($ENV{'request.course.id'}) { return ''; } |
unless ($ENV{'request.course.id'}) { return ''; } |