[svn:qpsmtpd] rev 414 - branches/high_perf/lib/Danga
[email protected] 9 May 2005 13:49:41 -0000
| Newsgroups | perl.cvs.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
Author: msergeant
Date: Mon May 9 06:49:40 2005
New Revision: 414
Modified:
branches/high_perf/lib/Danga/Socket.pm
Log:
Fixed typo in post_loop_callback name
Modified: branches/high_perf/lib/Danga/Socket.pm
==============================================================================
--- branches/high_perf/lib/Danga/Socket.pm (original)
+++ branches/high_perf/lib/Danga/Socket.pm Mon May 9 06:49:40 2005
@@ -801,10 +801,10 @@
if(ref $class) {
my Danga::Socket $self = $class;
if( defined $ref && ref $ref eq 'CODE' ) {
- $self->{PostLoopCallback} = $ref;
+ $self->{post_loop_callback} = $ref;
}
else {
- delete $self->{PostLoopCallback};
+ delete $self->{post_loop_callback};
}
}
else {