version 1.32, 2002/05/07 15:24:34
|
version 1.33, 2002/06/24 14:33:21
|
Line 396 ENDDISHEADER
|
Line 396 ENDDISHEADER
|
$ENV{'user.home'}))) { |
$ENV{'user.home'}))) { |
my ($sendtime,$shortsubj,$fromname,$fromdomain,$status)= |
my ($sendtime,$shortsubj,$fromname,$fromdomain,$status)= |
&Apache::lonmsg::unpackmsgid($_); |
&Apache::lonmsg::unpackmsgid($_); |
unless ($status eq 'deleted') { |
unless (($status eq 'deleted') || ($sendtime=~/error/)) { |
if ($status eq 'new') { |
if ($status eq 'new') { |
$r->print('<tr bgcolor="#FFBB77">'); |
$r->print('<tr bgcolor="#FFBB77">'); |
} elsif ($status eq 'read') { |
} elsif ($status eq 'read') { |