Changeset 815

Timestamp:

02/11/09 21:35:43 (10 months ago)

Author:

hachi

Message:

crash fix: aio_write returns a value of -1 on error

Files:

• trunk/lib/Perlbal/ClientProxy.pm (modified) (1 diff)

trunk/lib/Perlbal/ClientProxy.pm

@@ -1118 +1118 @@
 
         # check for error
-        unless ($bytes) {
+        unless ($bytes > 0) {
             Perlbal::log('crit', "Error writing buffered upload: $!.  Tried to do $len bytes at $self->{buoutpos}.");
             return $self->_simple_response(500);