Fix a weird thing I spotted in the last check in.
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@887 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
3ee6b632dc
commit
e600baeedf
@ -215,7 +215,6 @@ sub send_query {
|
|||||||
if (defined $s1) {
|
if (defined $s1) {
|
||||||
$self->{sockets}->{$z}->{$name}->{'txt'} = $s1;
|
$self->{sockets}->{$z}->{$name}->{'txt'} = $s1;
|
||||||
$self->{socket_select}->add($s1);
|
$self->{socket_select}->add($s1);
|
||||||
$self->{socket_idx}->{"$s1"} =
|
|
||||||
$self->{socket_idx}->{"$s1"} = $index;
|
$self->{socket_idx}->{"$s1"} = $index;
|
||||||
$count++;
|
$count++;
|
||||||
} else {
|
} else {
|
||||||
|
Loading…
Reference in New Issue
Block a user