view release on metacpan or  search on metacpan

lib/Data/AnyXfer/From/DBIC.pm  view on Meta::CPAN

    is      => 'ro',
    isa     => Bool,
    default => 0,
);

sub get_iterator {

    my $rs = $_[0]->from_rs;

    # check that resultset has some data to iterate over - this
    # should prevent empty iterations caused by an empty table or some
    # other glitch returning zero results. Please note there may still
    # be issues after this in the iteration phase which this check will
    # not catch?
    if ( $rs->count < 1 ) {
        croak sprintf 'ERROR: %s has a row count of 0', ref $rs;
    }


    unless ( $_[0]->force_dbic_inflate ) {
        $rs->result_class('DBIx::Class::ResultClass::HashRefInflator');