Changeset 8219

Timestamp:

03/21/08 00:59:13 (5 years ago)

Author:

hio

Message:

lang/perl/tiarra: fix, do not clear recvbuf on detach, it cause data lost

Files:

• lang/perl/tiarra/trunk/main/Tiarra/Socket/Buffered.pm (modified) (1 diff)

lang/perl/tiarra/trunk/main/Tiarra/Socket/Buffered.pm

@@ -68 +68 @@
     $this->{connected} = 0;
     $this->{sendbuf} = '';
-    $this->{recvbuf} = '';
+    #$this->{recvbuf} = '';
     $this->SUPER::detach;
 }