X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frelationship%2Fdoesnt_exist.t;h=7575122ebdde4689591632f003b6b274da1f03aa;hb=1239d14e2874c2209270d5388fd5055e348cf83f;hp=d440b529ff96d750f1970e93f425160fdb72406f;hpb=fd30f112753ccadd44937c71f386a6aba47a0bee;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/relationship/doesnt_exist.t b/t/relationship/doesnt_exist.t
index d440b52..7575122 100644
--- a/t/relationship/doesnt_exist.t
+++ b/t/relationship/doesnt_exist.t
@@ -1,7 +1,5 @@
-#!/usr/bin/perl -w
-
 use strict;
-use warnings;  
+use warnings;
 
 use Test::More;
 use lib qw(t/lib);
@@ -17,7 +15,7 @@ my $link_id = $link->id;
 ok $link->id;
 
 $link->delete;
-is $schema->resultset("Link")->search(id => $link_id)->count, 0,
+is $schema->resultset("Link")->search({id => $link_id})->count, 0,
     "link $link_id was deleted";
 
 # Get a fresh object with nothing cached
@@ -26,5 +24,5 @@ $bookmark = $schema->resultset("Bookmark")->find($bookmark->id);
 # This would create a new link row if none existed
 $bookmark->link;
 
-is $schema->resultset("Link")->search(id => $link_id)->count, 0,
+is $schema->resultset("Link")->search({id => $link_id})->count, 0,
     'accessor did not create a link object where there was none';