-# $Id: Record.pm,v 1.28 2007-12-12 08:49:58 mike Exp $
package ZOOM::IRSpy::Record;
### I don't think there's any reason for this to be separate from
target => $target,
parser => $parser,
zeerex => $parser->parse_string($zeerex)->documentElement(),
+ zoom_error => { TIMEOUT => 0 },
}, $class;
#Scalar::Util::weaken($this->{irspy});
return $this;
}
+sub zoom_error { return shift->{'zoom_error'} }
sub _empty_zeerex_record {
my($target) = @_;
$xml .= " $key=\"" . xml_encode($info{$key}) . "\"";
}
- $xml .= ">" . isodate(time()) . "</irspy:$type>\n";
+ $xml .= ">" . isodate(time()) . "</irspy:$type>";
- $this->append_entry('irspy:status', $xml);
+ $this->{irspy}->log("irspy_data", $xml);
+ $this->append_entry('irspy:status', $xml . "\n");
}