--- loncom/interface/lonfeedback.pm 2004/11/19 18:58:49 1.140 +++ loncom/interface/lonfeedback.pm 2004/11/19 19:11:33 1.141 @@ -1,7 +1,7 @@ # The LearningOnline Network # Feedback # -# $Id: lonfeedback.pm,v 1.140 2004/11/19 18:58:49 raeburn Exp $ +# $Id: lonfeedback.pm,v 1.141 2004/11/19 19:11:33 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2088,7 +2088,7 @@ ENDNOREDIRTWO } sub screen_header { - my ($feedurl) = @_; + my ($feedurl,$symb) = @_; my $msgoptions=''; my $discussoptions=''; unless (($ENV{'form.replydisc'}) || ($ENV{'form.editdisc'})) { @@ -2114,7 +2114,7 @@ sub screen_header { } } if ($ENV{'request.course.id'}) { - if (&discussion_open() && + if (&discussion_open(undef,$symb) && &Apache::lonnet::allowed('pch', $ENV{'request.course.id'}. ($ENV{'request.course.sec'}?'/'.$ENV{'request.course.sec'}:''))) { @@ -2124,7 +2124,7 @@ sub screen_header { $discussoptions.='
'. &mt('Anonymous contribution to course discussion of resource'). ' ('.&mt('name only visible to course faculty').')'; - } + } } if ($msgoptions) { $msgoptions='

'.&mt('Sending Messages').'

'.$msgoptions; } if ($discussoptions) { @@ -3101,7 +3101,7 @@ ENDREDIR unless ($ENV{'form.sendit'}) { &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; - my $options=&screen_header($feedurl); + my $options=&screen_header($feedurl,$symb); if ($options) { &mail_screen($r,$feedurl,$options); } else {