Stop testing a target if we got to many timeouts (>= 3). See bug #3382

[irspy-moved-to-github.git] / lib / ZOOM / IRSpy / Record.pm

diff --git a/lib/ZOOM/IRSpy/Record.pm b/lib/ZOOM/IRSpy/Record.pm
index b0b0bfd..c5b6c1b 100644 (file)
--- a/lib/ZOOM/IRSpy/Record.pm
+++ b/lib/ZOOM/IRSpy/Record.pm
@@ -41,6 +41,7 @@ sub new {
        target => $target,
        parser => $parser,
        zeerex => $parser->parse_string($zeerex)->documentElement(),
        target => $target,
        parser => $parser,
        zeerex => $parser->parse_string($zeerex)->documentElement(),

+       zoom_error => { TIMEOUT => 0 },

     }, $class;
 
     #Scalar::Util::weaken($this->{irspy});
     }, $class;
 
     #Scalar::Util::weaken($this->{irspy});

@@ -49,6 +50,7 @@ sub new {
     return $this;
 }
 
     return $this;
 }
 

+sub zoom_error { return shift->{'zoom_error'} }

 
 sub _empty_zeerex_record {
     my($target) = @_;
 
 sub _empty_zeerex_record {
     my($target) = @_;