X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fstorage%2Fdbh_do.t;fp=t%2Fstorage%2Fdbh_do.t;h=952fa1c9d3b294c95144aca853bb58e9c406a906;hb=b74b15b066a19f07b575883abd397ea4d3b045db;hp=0beb8581ebec45bdcbbe30082ef08b5887db8dd9;hpb=df604e83d5005e19e31f3fbd02e62ee30359fdf9;p=dbsrgits%2FDBIx-Class.git diff --git a/t/storage/dbh_do.t b/t/storage/dbh_do.t index 0beb858..952fa1c 100644 --- a/t/storage/dbh_do.t +++ b/t/storage/dbh_do.t @@ -43,7 +43,7 @@ is_deeply ( # test nested aliasing my $res = 'original'; -$storage->dbh_do (sub { +$schema->storage->dbh_do (sub { shift->dbh_do(sub { $_[3] = 'changed' }, @_) }, $res);