Return to lonfeedback.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.248, 2007/08/06 19:55:51 | version 1.249, 2007/08/06 20:08:31 |
---|---|
Line 48 use LONCAPA; | Line 48 use LONCAPA; |
sub discussion_open { | sub discussion_open { |
my ($status,$symb)=@_; | my ($status,$symb)=@_; |
if ($env{'request.role.adv'}) { return 0; } | if ($env{'request.role.adv'}) { return 1; } |
if (defined($status) && | if (defined($status) && |
!($status eq 'CAN_ANSWER' || $status eq 'CANNOT_ANSWER' | !($status eq 'CAN_ANSWER' || $status eq 'CANNOT_ANSWER' |
|| $status eq 'OPEN')) { | || $status eq 'OPEN')) { |