--- loncom/interface/lonfeedback.pm 2006/05/09 15:09:27 1.197
+++ loncom/interface/lonfeedback.pm 2006/05/09 20:00:44 1.198
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Feedback
#
-# $Id: lonfeedback.pm,v 1.197 2006/05/09 15:09:27 albertel Exp $
+# $Id: lonfeedback.pm,v 1.198 2006/05/09 20:00:44 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -726,7 +726,7 @@ ENDDISCUSS
if ($outputtarget ne 'tex') {
$discussion.=&generate_attachments_button('',$attachnum,$ressymb,$now,\@currnewattach,\@currdelold,'',$mode);
if (@currnewattach > 0) {
- $newattachmsg .= 'New attachments
';
+ $newattachmsg .= '
New attachments
';
if (@currnewattach > 1) {
$newattachmsg .= '
';
foreach my $item (@currnewattach) {
@@ -1328,12 +1328,15 @@ sub mail_screen {
my $attachnum = 0;
my $anonchk = (<print(&generate_attachments_button($postidx,$attachnum,$ressymb,$now,\@currnewattach,\@currdelold,$numoldver));
if ($attachnum > 0) {
if (@currnewattach > 0) {
- $newattachmsg .= 'New attachments
';
+ $newattachmsg .= '
New attachments
';
if (@currnewattach > 1) {
$newattachmsg .= '';
foreach my $item (@currnewattach) {
@@ -2292,10 +2293,9 @@ sub screen_header {
&Apache::lonnet::allowed('pch',
$env{'request.course.id'}.
($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:''))) {
- $discussoptions='