X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FCursor.pm;h=d2aa34751ec70edc0593508d48edb4c2535c122a;hb=685dad647365aacb8c3f8ed994d929e724ebb2e7;hp=2550adc4d0958d9e8ab411b12e900d18d594daab;hpb=eaefb953638f736ee8988251bf8cfc8bedad2563;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/Cursor.pm b/lib/DBIx/Class/Storage/DBI/Cursor.pm index 2550adc..d2aa347 100644 --- a/lib/DBIx/Class/Storage/DBI/Cursor.pm +++ b/lib/DBIx/Class/Storage/DBI/Cursor.pm @@ -61,7 +61,8 @@ sub new { =back -Advances the cursor to the next row and returns an arrayref of column values. +Advances the cursor to the next row and returns an array of column +values (the result of L method). =cut @@ -160,7 +161,7 @@ sub DESTROY { my ($self) = @_; $self->_check_forks_threads; - $self->{sth}->finish if $self->{sth}->{Active}; + $self->{sth}->finish if $self->{sth} && $self->{sth}->{Active}; } 1;