Fixed local_port => remote_port
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@776 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
a7914ac0dc
commit
3a85914315
@ -18,7 +18,7 @@ sub start {
|
|||||||
|
|
||||||
# generate id
|
# generate id
|
||||||
my $conn = $args{connection};
|
my $conn = $args{connection};
|
||||||
my $ip = $conn->local_port || "0";
|
my $ip = $conn->remote_port || "0";
|
||||||
my $start = time;
|
my $start = time;
|
||||||
my $id = "$start.$$.$ip";
|
my $id = "$start.$$.$ip";
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user