version 1.169, 2013/09/04 14:21:30
|
version 1.170, 2013/09/04 14:51:00
|
Line 1204 ENDDISHEADER
|
Line 1204 ENDDISHEADER
|
foreach my $item ($localsenttime,$dis_name,$dis_domain,$shortsubj) { |
foreach my $item ($localsenttime,$dis_name,$dis_domain,$shortsubj) { |
$r->print('<td>'.(($status eq 'new')?'<b>':''). |
$r->print('<td>'.(($status eq 'new')?'<b>':''). |
'<a href="/adm/email?display='.$origID.$sqs.'">'. |
'<a href="/adm/email?display='.$origID.$sqs.'">'. |
$item.(($status eq 'new')?'</b>':'').'</a></td>'); |
$item.'</a>'.(($status eq 'new')?'</b>':'').'</td>'); |
} |
} |
# Description and Status |
# Description and Status |
my $showstatus; |
my $showstatus; |
Line 1254 ENDDISHEADER
|
Line 1254 ENDDISHEADER
|
$r->print(' <option value="markeddel">'.&mt('Delete').'</option>'."\n"); |
$r->print(' <option value="markeddel">'.&mt('Delete').'</option>'."\n"); |
} |
} |
if ($msgstatus ne 'read') { |
if ($msgstatus ne 'read') { |
$r->print(' <option value="markedread">'.&mt('Mark Read').'</option>."\n"'); |
$r->print(' <option value="markedread">'.&mt('Mark Read').'</option>'."\n"); |
} |
} |
if ($msgstatus ne 'unread') { |
if ($msgstatus ne 'unread') { |
$r->print(' <option value="markedunread">'.&mt('Mark Unread').'</option>'."\n"); |
$r->print(' <option value="markedunread">'.&mt('Mark Unread').'</option>'."\n"); |
Line 1924 sub disfacetoface {
|
Line 1924 sub disfacetoface {
|
} else { |
} else { |
%content=&Apache::lonmsg::unpackagemsg($content{'message'}); |
%content=&Apache::lonmsg::unpackagemsg($content{'message'}); |
$content{'message'} = |
$content{'message'} = |
'<b>'.&mt('Subject').': '.$content{'subject'}.'</b><br |
'<b>'.&mt('Subject').': '.$content{'subject'}.'</b><br />'. |
'. |
|
$content{'message'}; |
$content{'message'}; |
} |
} |
} else { |
} else { |