[Catalyst-commits] r13823 - in Catalyst-Model-DBIC-Schema/trunk: . lib/Catalyst/Helper/Model/DBIC

[caelum at dev.catalyst.perl.org]

Author: caelum
Date: 2010-12-08 22:20:05 +0000 (Wed, 08 Dec 2010)
New Revision: 13823

Modified:
   Catalyst-Model-DBIC-Schema/trunk/Changes
   Catalyst-Model-DBIC-Schema/trunk/lib/Catalyst/Helper/Model/DBIC/Schema.pm
Log:
fix loader version check

Modified: Catalyst-Model-DBIC-Schema/trunk/Changes
===================================================================
--- Catalyst-Model-DBIC-Schema/trunk/Changes	2010-12-08 21:27:46 UTC (rev 13822)
+++ Catalyst-Model-DBIC-Schema/trunk/Changes	2010-12-08 22:20:05 UTC (rev 13823)
@@ -1,5 +1,7 @@
 Revision history for Perl extension Catalyst::Model::DBIC::Schema
 
+        - fix loader version check
+
 0.46  Wed Dec  8 13:35:28 UTC 2010
         - make use_moose detection more robust
 

Modified: Catalyst-Model-DBIC-Schema/trunk/lib/Catalyst/Helper/Model/DBIC/Schema.pm
===================================================================
--- Catalyst-Model-DBIC-Schema/trunk/lib/Catalyst/Helper/Model/DBIC/Schema.pm	2010-12-08 21:27:46 UTC (rev 13822)
+++ Catalyst-Model-DBIC-Schema/trunk/lib/Catalyst/Helper/Model/DBIC/Schema.pm	2010-12-08 22:20:05 UTC (rev 13823)
@@ -443,7 +443,7 @@
 
         return 'Result' if $@;
 
-        return DBIx::Class::Schema::Loader->VERSION('0.05') ? 'Result' : '';
+        return try { DBIx::Class::Schema::Loader->VERSION('0.05') } ? 'Result' : '';
     }
 
     open my $fh, '<', $schema_pm or die "Could not open $schema_pm: $!";