X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F72pg.t;h=e5d1bef432dd4c82e60884ac3e35da86661fba0a;hb=491c8ff9f0bd64d1d74b94ad1b0dd5fef37eb52a;hp=542b915080a61907a3d4557eccc159b82a28e2c8;hpb=0647e0cc4a0845da7df3775b1b56bd2b6f9efeb2;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/72pg.t b/t/72pg.t
index 542b915..e5d1bef 100644
--- a/t/72pg.t
+++ b/t/72pg.t
@@ -238,12 +238,15 @@ for my $use_insert_returning ($test_server_supports_insert_returning
         $schema2->source("Artist")->name("dbic_t_schema.artist");
 
         $schema->txn_do( sub {
-          my $artist = $schema->resultset('Artist')->search(
+          my $rs = $schema->resultset('Artist')->search(
               {
                   artistid => 1
               },
               $t->{update_lock} ? { for => 'update' } : {}
-          )->first;
+          );
+          ok ($rs->count, 'Count works');
+
+          my $artist = $rs->next;
           is($artist->artistid, 1, "select returns artistid = 1");
 
           $timed_out = 0;