version 1.150, 2010/04/14 06:34:19
|
version 1.152, 2010/06/06 01:17:08
|
Line 3185 sub sendoffmail {
|
Line 3185 sub sendoffmail {
|
my ($recuname,$recdomain)=split(/\:/,$address); |
my ($recuname,$recdomain)=split(/\:/,$address); |
my $msgtxt = $savemsg; |
my $msgtxt = $savemsg; |
if ($toaddr{$address}) { |
if ($toaddr{$address}) { |
$msgtxt.='<hr />'.$toaddr{$address}; |
$msgtxt.="\n".'<hr />'."\n".$toaddr{$address}; |
} |
} |
my @thismsg; |
my @thismsg; |
if ($msgtype eq 'critical') { |
if ($msgtype eq 'critical') { |
Line 3310 sub sendoffmail {
|
Line 3310 sub sendoffmail {
|
$r->print($message); |
$r->print($message); |
} |
} |
} |
} |
|
} else { |
|
&printheader($r,'','Messages cancelled.'); |
|
return 'cancelled'; |
} |
} |
return $sendstatus; |
return $sendstatus; |
} |
} |