X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXChannel.pm;h=240142c65107a80e6979fa417935f247fd4f1866;hb=eba7370bb0458ae84b4815f30494a7c389008d0e;hp=84585ef1ee240f8d19ad10ba6d3468d386b26953;hpb=f91073b99369ea05c42364f9462695be7a67016d;p=spider.git diff --git a/perl/DXChannel.pm b/perl/DXChannel.pm index 84585ef1..240142c6 100644 --- a/perl/DXChannel.pm +++ b/perl/DXChannel.pm @@ -135,7 +135,7 @@ $count = 0; wx => '0,Want WX,yesno', ); -$maxerrors = 20; # the maximum number of concurrent errors allowed before disconnection +$maxerrors = 5; # the maximum number of concurrent errors allowed before disconnection # object destruction sub DESTROY @@ -175,6 +175,7 @@ sub alloc $self->{lang} = $main::lang if !$self->{lang}; $self->{func} = ""; $self->{width} ||= 80; + $self->{_nospawn} = 0; # add in all the dxcc, itu, zone info my @dxcc = Prefix::extract($call);