--- loncom/interface/lonmsg.pm	2002/05/07 15:24:34	1.32
+++ loncom/interface/lonmsg.pm	2002/06/26 20:41:55	1.34
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines for messaging
 #
-# $Id: lonmsg.pm,v 1.32 2002/05/07 15:24:34 matthew Exp $
+# $Id: lonmsg.pm,v 1.34 2002/06/26 20:41:55 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -314,7 +314,8 @@ sub discrit {
         $content{'message'}=~s/\n/\<br\>/g;
         $result.='<hr>From: <b>'.$content{'sendername'}.'@'.
             $content{'senderdomain'}.'</b> ('.$content{'time'}.
-            ')<br><blockquote>'.$content{'message'}.'</blockquote>'.
+            ')<br>Subject: '.$content{'subject'}.
+            '<br><blockquote>'.$content{'message'}.'</blockquote>'.
             '<input type=submit name="rec_'.$_.'" value="Confirm Receipt">'.
             '<input type=submit name="reprec_'.$_.'" '.
                   'value="Confirm Receipt and Reply">';
@@ -396,7 +397,7 @@ ENDDISHEADER
                                         $ENV{'user.home'}))) {
         my ($sendtime,$shortsubj,$fromname,$fromdomain,$status)=
 	    &Apache::lonmsg::unpackmsgid($_);
-       unless ($status eq 'deleted') {
+       unless (($status eq 'deleted') || ($sendtime=~/error/)) {
         if ($status eq 'new') {
 	    $r->print('<tr bgcolor="#FFBB77">');
         } elsif ($status eq 'read') {