--- loncom/interface/lonfeedback.pm 2007/08/06 19:55:51 1.248 +++ loncom/interface/lonfeedback.pm 2008/02/25 13:16:34 1.252 @@ -1,7 +1,7 @@ # The LearningOnline Network # Feedback # -# $Id: lonfeedback.pm,v 1.248 2007/08/06 19:55:51 albertel Exp $ +# $Id: lonfeedback.pm,v 1.252 2008/02/25 13:16:34 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -48,7 +48,7 @@ use LONCAPA; sub discussion_open { my ($status,$symb)=@_; - if ($env{'request.role.adv'}) { return 0; } + if ($env{'request.role.adv'}) { return 1; } if (defined($status) && !($status eq 'CAN_ANSWER' || $status eq 'CANNOT_ANSWER' || $status eq 'OPEN')) { @@ -91,7 +91,7 @@ sub list_discussion { if (not &discussion_visible($status)) { if ($mode ne 'board') { &Apache::lonenc::check_encrypt(\$ressymb); - return &send_message_link($ressymb); + return '
'.&send_message_link($ressymb); } } if ($group ne '' && $mode eq 'board') { @@ -732,20 +732,19 @@ END } } } else { - $discussion.=''; + $discussion.=''; } return $discussion; } @@ -763,7 +762,7 @@ sub send_feedback_link { sub send_message_link { my ($ressymb) = @_; - my $output = ''. + my $output = ''. '