Removed finish in Cursor::next, not necessary because the sth is already at the end...
Andy Grundman [Tue, 2 Aug 2005 17:48:44 +0000 (17:48 +0000)]
lib/DBIx/Class/Cursor.pm

index b0565d1..52aa9e8 100644 (file)
@@ -47,10 +47,7 @@ sub next {
     $self->{live_sth} = 1;
   }
   my @row = $self->{sth}->fetchrow_array;
-  unless (@row) {
-    $self->{sth}->finish if $self->{sth}->{Active};
-    return;
-  }
+  return unless (@row);
   $self->{pos}++;
   return $self->{class}->_row_to_object($self->{cols}, \@row);
 }