--- AnyEvent-FCP/FCP.pm 2010/06/05 14:49:25 1.7 +++ AnyEvent-FCP/FCP.pm 2010/06/18 16:59:13 1.8 @@ -115,7 +115,7 @@ $self->{host} ||= $ENV{FREDHOST} || "127.0.0.1"; $self->{port} ||= $ENV{FREDPORT} || 9481; $self->{name} ||= time.rand.rand.rand; # lame - $self->{timeout} ||= 600; + $self->{timeout} ||= 3600*2; $self->{progress} ||= sub { }; $self->{id} = "a0"; @@ -127,7 +127,7 @@ connect => [$self->{host} => $self->{port}], timeout => $self->{timeout}, on_error => sub { - warn "<@_>\n"; + warn "@_\n";#d# exit 1; }, on_read => sub { $self->on_read (@_) },