You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@spamassassin.apache.org by ms...@apache.org on 2004/05/31 15:41:23 UTC
svn commit: rev 20687 - incubator/spamassassin/trunk/lib/Mail/SpamAssassin
Author: mss
Date: Mon May 31 06:41:22 2004
New Revision: 20687
Modified:
incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
Log:
bug 3431: fourth part, finally :) a conflict held this and number three back
Modified: incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm
==============================================================================
--- incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm (original)
+++ incubator/spamassassin/trunk/lib/Mail/SpamAssassin/PerMsgStatus.pm Mon May 31 06:41:22 2004
@@ -938,6 +938,7 @@
} @{$info}[0..$amt-1];
}
+
sub set_tag {
my $self = shift;
my $tag = uc shift;
@@ -946,6 +947,7 @@
$self->{tag_data}->{$tag} = $val;
}
+
sub _get_tag_value_for_yesno {
my $self = shift;
@@ -992,6 +994,15 @@
HOSTNAME => sub {
$self->{conf}->{report_hostname} ||
Mail::SpamAssassin::Util::fq_hostname();
+ },
+
+ REMOTEHOSTNAME => sub {
+ $self->{tag_data}->{'REMOTEHOSTNAME'} ||
+ "localhost";
+ },
+ REMOTEHOSTADDR => sub {
+ $self->{tag_data}->{'REMOTEHOSTADDR'} ||
+ "127.0.0.1";
},
CONTACTADDRESS => sub { $self->{conf}->{report_contact}; },