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:
Matt Sergeant 2008-05-05 17:13:56 +00:00
parent 3ee6b632dc
commit e600baeedf

View File

@ -215,7 +215,6 @@ sub send_query {
if (defined $s1) {
$self->{sockets}->{$z}->{$name}->{'txt'} = $s1;
$self->{socket_select}->add($s1);
$self->{socket_idx}->{"$s1"} =
$self->{socket_idx}->{"$s1"} = $index;
$count++;
} else {