X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Ficdt%2Fengine_specific%2Fsybase.t;h=c63944e17e3942328e476e6480ac7b486b4da4cf;hb=bbf6a9a5d39cbf1c9d22cccd298ae95ac0fef694;hp=5f6efc8fc543fa7aef5245612e1f513ab5afaecc;hpb=1f99022a59628403ab2db026216ed890f55b8d90;p=dbsrgits%2FDBIx-Class.git diff --git a/t/icdt/engine_specific/sybase.t b/t/icdt/engine_specific/sybase.t index 5f6efc8..c63944e 100644 --- a/t/icdt/engine_specific/sybase.t +++ b/t/icdt/engine_specific/sybase.t @@ -5,8 +5,7 @@ use warnings; use Test::More; use Test::Exception; -use Scope::Guard (); -use Try::Tiny; +use DBIx::Class::_Util 'scope_guard'; use lib qw(t/lib); use DBICTest; @@ -30,7 +29,7 @@ for my $storage_type (@storage_types) { on_connect_call => 'datetime_setup', }); - my $guard = Scope::Guard->new(sub { cleanup($schema) } ); + my $guard = scope_guard { cleanup($schema) }; $schema->storage->ensure_connected;