byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Remove the $transaction->relaying() code completely

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@327 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
John Peacock 2004-09-23 13:51:09 +00:00
parent f92e99bd9c
commit b9646eef75
3 changed files with 2 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Changes
View File

@ -27,9 +27,8 @@
Move relay flag to connection object (John Peacock): Move relay flag to connection object (John Peacock):
+ add relay_client() method to Connection.pm + add relay_client() method to Connection.pm
+ change SMTP.pm to copy relay_client() flag to transaction relaying
flag (for compatibility purposes) - should deprecate instead
+ Update Auth.pm module to set $connection->relay_client() + Update Auth.pm module to set $connection->relay_client()
+ Remove $transaction->relaying() completely (due to popular demand)
Split check_relay plugin into two plugins (John Peacock): Split check_relay plugin into two plugins (John Peacock):
+ check_relay now fires on connect and sets relay_client() flag + check_relay now fires on connect and sets relay_client() flag

4
lib/Qpsmtpd/SMTP.pm
View File

@ -116,9 +116,7 @@ sub transaction {
sub reset_transaction { sub reset_transaction {
my $self = shift; my $self = shift;
$self->run_hooks("reset_transaction") if $self->{_transaction}; $self->run_hooks("reset_transaction") if $self->{_transaction};
$self->{_transaction} = Qpsmtpd::Transaction->new(); return $self->{_transaction} = Qpsmtpd::Transaction->new();
$self->{_transaction}->relaying($self->{_connection}->{_relay_client});
return $self->{_transaction};
} }

6
lib/Qpsmtpd/Transaction.pm
View File

@ -32,12 +32,6 @@ sub recipients {
($self->{_recipients} ? @{$self->{_recipients}} : ()); ($self->{_recipients} ? @{$self->{_recipients}} : ());
} }
sub relaying {
my $self = shift;
@_ and $self->{_relaying} = shift;
$self->{_relaying};
}
sub sender { sub sender {
my $self = shift; my $self = shift;
@_ and $self->{_sender} = shift; @_ and $self->{_sender} = shift;