--- cvsroot/Net-FCP/FCP.pm	2005/12/29 14:01:19	1.37
+++ cvsroot/Net-FCP/FCP.pm	2006/11/27 13:16:25	1.38
@@ -501,7 +501,7 @@
 sub fh_ready_r {
    my ($self) = @_;
 
-   if (sysread $self->{fh}, $self->{buf}, 65536, length $self->{buf}) {
+   if (sysread $self->{fh}, $self->{buf}, 16384 + 1024, length $self->{buf}) {
       for (;;) {
          if ($self->{datalen}) {
             #warn "expecting new datachunk $self->{datalen}, got ".(length $self->{buf})."\n";#d#