version 1.249, 2007/08/06 20:08:31
|
version 1.252, 2008/02/25 13:16:34
|
Line 91 sub list_discussion {
|
Line 91 sub list_discussion {
|
if (not &discussion_visible($status)) { |
if (not &discussion_visible($status)) { |
if ($mode ne 'board') { |
if ($mode ne 'board') { |
&Apache::lonenc::check_encrypt(\$ressymb); |
&Apache::lonenc::check_encrypt(\$ressymb); |
return &send_message_link($ressymb); |
return '<br />'.&send_message_link($ressymb); |
} |
} |
} |
} |
if ($group ne '' && $mode eq 'board') { |
if ($group ne '' && $mode eq 'board') { |
Line 732 END
|
Line 732 END
|
} |
} |
} |
} |
} else { |
} else { |
$discussion.='<table class="LC_feedback_link"><tr><td>'; |
$discussion.='<div class="LC_feedback_link">'; |
if (&discussion_open($status) && |
if (&discussion_open($status) && |
&Apache::lonnet::allowed('pch', |
&Apache::lonnet::allowed('pch', |
$env{'request.course.id'}. |
$env{'request.course.id'}. |
($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:''))) { |
($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:''))) { |
if ($outputtarget ne 'tex') { |
if ($outputtarget ne 'tex') { |
$discussion.= &send_feedback_link($ressymb,$target). |
$discussion.= &send_feedback_link($ressymb,$target); |
'<br />'; |
|
} |
} |
} |
} |
if ($outputtarget ne 'tex') { |
if ($outputtarget ne 'tex') { |
$discussion.= &send_message_link($ressymb); |
$discussion.= &send_message_link($ressymb); |
} |
} |
$discussion.='</td></tr></table>'; |
$discussion.='</div>'; |
} |
} |
return $discussion; |
return $discussion; |
} |
} |
Line 763 sub send_feedback_link {
|
Line 762 sub send_feedback_link {
|
|
|
sub send_message_link { |
sub send_message_link { |
my ($ressymb) = @_; |
my ($ressymb) = @_; |
my $output = '<span class="LC_feedback_link">'. |
my $output = '<span class="LC_message_link">'. |
' <a href="/adm/feedback?sendmessageonly=1&symb='. |
' <a href="/adm/feedback?sendmessageonly=1&symb='. |
&escape($ressymb).'"><img alt="" src="'. |
&escape($ressymb).'"><img alt="" src="'. |
&Apache::loncommon::lonhttpdurl('/adm/lonMisc/feedback.gif'). |
&Apache::loncommon::lonhttpdurl('/adm/lonMisc/feedback.gif'). |