![]() ![]() | ![]() |
version 1.169, 2005/10/04 18:27:32 | version 1.170, 2005/10/30 02:38:10 |
---|---|
Line 45 use Cwd; | Line 45 use Cwd; |
sub discussion_open { | sub discussion_open { |
my ($status,$symb)=@_; | my ($status,$symb)=@_; |
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')) { |