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

fix compilation error

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@288 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Robert Spier 2004-08-14 17:42:45 +00:00
parent 1eefd49c22
commit 616aa735b9
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
qpsmtpd-forkserver
View File

@ -120,7 +120,7 @@ while (1) {
# "Use of freed value in iteration" under perl 5.8.4. # "Use of freed value in iteration" under perl 5.8.4.
my @rip = values %childstatus; my @rip = values %childstatus;
foreach my $rip (@rip) { foreach my $rip (@rip) {
++$num_conn if (defined $rip && $rip eq $iaddr) { ++$num_conn if (defined $rip && $rip eq $iaddr);
} }
if ($num_conn > $MAXCONNIP) { if ($num_conn > $MAXCONNIP) {