version 1.181, 2006/04/11 14:17:23
|
version 1.182, 2006/04/23 04:04:38
|
Line 188 sub unpackmsgid {
|
Line 188 sub unpackmsgid {
|
$msgid=&Apache::lonnet::unescape($msgid); |
$msgid=&Apache::lonnet::unescape($msgid); |
my ($sendtime,$shortsubj,$fromname,$fromdomain,$count,$fromcid, |
my ($sendtime,$shortsubj,$fromname,$fromdomain,$count,$fromcid, |
$processid)=split(/\:/,&Apache::lonnet::unescape($msgid)); |
$processid)=split(/\:/,&Apache::lonnet::unescape($msgid)); |
|
$shortsubj = &Apache::lonnet::unescape($shortsubj); |
|
$shortsubj = &HTML::Entities::decode($shortsubj); |
if (!defined($processid)) { $fromcid = ''; } |
if (!defined($processid)) { $fromcid = ''; } |
my %status=(); |
my %status=(); |
unless ($skipstatus) { |
unless ($skipstatus) { |