X-Git-Url: http://git.indexdata.com/?p=irspy-moved-to-github.git;a=blobdiff_plain;f=lib%2FZOOM%2FIRSpy%2FRecord.pm;h=a630356a6296bd4cf4ae80a680d00a90cd8cdb0c;hp=a0738c8219cd8a257743e8cae27318243b4ffbe6;hb=cbae1049fb72c8be95c1d7dae26f83accb580a78;hpb=107a174e56c7b08f5401dd8d878fc143d93b879c diff --git a/lib/ZOOM/IRSpy/Record.pm b/lib/ZOOM/IRSpy/Record.pm index a0738c8..a630356 100644 --- a/lib/ZOOM/IRSpy/Record.pm +++ b/lib/ZOOM/IRSpy/Record.pm @@ -1,6 +1,8 @@ -# $Id: Record.pm,v 1.21 2006-11-30 12:01:23 mike Exp $ +# $Id: Record.pm,v 1.23 2007-03-05 19:42:13 mike Exp $ package ZOOM::IRSpy::Record; +### I don't think there's any reason for this to be separate from +# ZOOM::IRSpy::Connection, now that the correspondence is always 1:1 use 5.008; use strict; @@ -32,6 +34,7 @@ sub new { $zeerex = _empty_zeerex_record($target); } + ### Parser should be in the IRSpy object my $parser = new XML::LibXML(); return bless { irspy => $irspy,