Revert to eval instead of try::tiny because no check for $@
Ton Voon [Mon, 17 May 2010 12:55:13 +0000 (12:55 +0000)]
lib/DBIx/Class/Schema/Versioned.pm

index a10e1fd..2021cf7 100644 (file)
@@ -503,9 +503,8 @@ sub get_db_version
     my ($self, $rs) = @_;
 
     my $vtable = $self->{vschema}->resultset('Table');
-    my $version;
-    try {
-      $version = $vtable->search({}, { order_by => { -desc => 'installed' }, rows => 1 } )
+    my $version = eval {
+      $vtable->search({}, { order_by => { -desc => 'installed' }, rows => 1 } )
               ->get_column ('version')
                ->next;
     };