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

When setting OtherFds, always make it an addition to what's already set

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@498 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Matt Sergeant 2005-07-12 20:40:32 +00:00
parent e407e8b470
commit 54cff7af40
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/Danga/Socket.pm
View File

@ -107,7 +107,7 @@ sub ToClose { return @ToClose; }
### the registered Danga::Socket objects. ### the registered Danga::Socket objects.
sub OtherFds { sub OtherFds {
my $class = shift; my $class = shift;
if ( @_ ) { %OtherFds = @_ } if ( @_ ) { %OtherFds = (%OtherFds, @_) }
return wantarray ? %OtherFds : \%OtherFds; return wantarray ? %OtherFds : \%OtherFds;
} }