--- loncom/interface/lonfeedback.pm 2003/09/17 18:16:39 1.60 +++ loncom/interface/lonfeedback.pm 2003/10/15 20:13:31 1.63 @@ -1,7 +1,7 @@ # The LearningOnline Network # Feedback # -# $Id: lonfeedback.pm,v 1.60 2003/09/17 18:16:39 albertel Exp $ +# $Id: lonfeedback.pm,v 1.63 2003/10/15 20:13:31 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -51,6 +51,7 @@ use Apache::Constants qw(:common); use Apache::lonmsg(); use Apache::loncommon(); use Apache::lontexconvert(); +use Apache::lonlocal; sub list_discussion { my ($mode,$status,$symb)=@_; @@ -88,10 +89,10 @@ sub list_discussion { if ($contrib{$idx.':attachmenturl'}) { my ($fname,$ft) =($contrib{$idx.':attachmenturl'}=~/\/(\w+)\.(\w+)$/); - $message.='
Attachment: '.$fname.'.'.$ft.''; + '">'.$fname.'.'.$ft.'
'; } if ($message) { if ($hidden) { @@ -104,7 +105,7 @@ sub list_discussion { $contrib{$idx.':sendername'}, $contrib{$idx.':senderdomain'}); - my $sender='Anonymous'; + my $sender=&mt('Anonymous'); if ((!$contrib{$idx.':anonymous'}) || ($seeid)) { $sender=&Apache::loncommon::aboutmewrapper( $plainname, @@ -113,19 +114,19 @@ sub list_discussion { $contrib{$idx.':sendername'}.' at '. $contrib{$idx.':senderdomain'}.')'; if ($contrib{$idx.':anonymous'}) { - $sender.=' [anonymous] '. + $sender.=' ['.&mt('anonymous').'] '. $screenname; } if ($seeid) { if ($hidden) { $sender.=' Make Visible'; + $symb.':::'.$idx.'">'.&mt('Make Visible').''; } else { $sender.=' Hide'; + $symb.':::'.$idx.'">'.&mt('Hide').''; } $sender.=' Delete'; + $symb.':::'.$idx.'">'.&mt('Delete').''; } } else { if ($screenname) { @@ -158,7 +159,7 @@ sub list_discussion {Attachment (128 KB max size):
@@ -181,7 +182,8 @@ sub mail_screen {Feedback to resource author'; + '
'. + &mt('Feedback to resource author').'
'; } if (&feedback_available(1)) { $msgoptions.= - '