X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FChain.pm;h=60266c755716d84d3aa625c90ad2b8a25e84b671;hb=d384410d4d5d1031cabab44350b80f2a55fe808d;hp=c065d17a62305b6c9fb224f0eb51a45b5ab34c1b;hpb=03c2eda593235d8299fa285827d0caade6fe8fc1;p=spider.git diff --git a/perl/Chain.pm b/perl/Chain.pm index c065d17a..60266c75 100644 --- a/perl/Chain.pm +++ b/perl/Chain.pm @@ -15,7 +15,7 @@ use constant OBJ => 2; use vars qw($docheck); -$docheck = 1; +$docheck = 0; sub _check {