-# $Id: Retrieve.pm,v 1.5 2007-05-09 11:02:41 mike Exp $
+# $Id: Retrieve.pm,v 1.6 2007-05-09 11:05:30 mike Exp $
package ZOOM::IRSpy::Task::Retrieve;
$this->{rs} = $rs;
$this->{index0} = $index0;
# Save initial record-syntax for render()'s benefit
- $this->{rs} = $this->{options}->{preferredRecordSyntax};
+ $this->{syntax} = $this->{options}->{preferredRecordSyntax};
return $this;
}
sub render {
my $this = shift();
- my $syntax = $this->{rs};
+ my $syntax = $this->{syntax};
$syntax = defined $syntax ? "'$syntax'" : "undef";
return ref($this) . "(" . $this->{index0} . ", $syntax)";
}