From: Ton Voon <ton.voon@opsera.com>
Date: Mon, 17 May 2010 12:55:13 +0000 (+0000)
Subject: Revert to eval instead of try::tiny because no check for $@
X-Git-Tag: v0.08122~57^2~10
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=67e7b822a0f4105d8127538ae4f8cf4212df46f4;p=dbsrgits%2FDBIx-Class.git

Revert to eval instead of try::tiny because no check for $@
---

diff --git a/lib/DBIx/Class/Schema/Versioned.pm b/lib/DBIx/Class/Schema/Versioned.pm
index a10e1fd..2021cf7 100644
--- a/lib/DBIx/Class/Schema/Versioned.pm
+++ b/lib/DBIx/Class/Schema/Versioned.pm
@@ -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;
     };