X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;h=bf7494a7ef53a20c91dbecd695e01c3724b1f4ee;hb=76027e074b381b0cdc76b3c23ac751802ee174fe;hp=a3b5e983586ed9a9fdab49eac489323660813646;hpb=a68508856d1efca83b9e21820e906229433dc681;p=spider.git diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index a3b5e983..bf7494a7 100644 --- a/perl/DXMsg.pm +++ b/perl/DXMsg.pm @@ -485,7 +485,7 @@ sub notify my $fromaddr = $email_from || $main::myemail; my @headers = ("To: $ref->{to}", "From: $fromaddr", - "Subject: [DXSpider: $ref->{from}] $ref->{subject}", + "Subject: [DXSpider: $ref->{from}\@$ref->{origin}] $ref->{subject}", "X-DXSpider-To: $ref->{to}", "X-DXSpider-From: $ref->{from}\@$ref->{origin}", "X-DXSpider-Gateway: $main::mycall"