X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FRelationship%2FHasMany.pm;h=d8e651d470c8ea7715c973ee24e241dbfb1ba535;hb=f43ea814d6c4c181aeaac244c5db17058aac3d5e;hp=6063eaee09d5315a22b2bcbc56700485de308791;hpb=ed7ab0f4ce1a9118ea6285ee562ef003085a6b64;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/Relationship/HasMany.pm b/lib/DBIx/Class/Relationship/HasMany.pm index 6063eae..d8e651d 100644 --- a/lib/DBIx/Class/Relationship/HasMany.pm +++ b/lib/DBIx/Class/Relationship/HasMany.pm @@ -40,7 +40,7 @@ sub has_many { $guess = "using our class name '$class' as foreign key"; } - my $f_class_loaded = eval { $f_class->columns }; + my $f_class_loaded = try { $f_class->columns }; $class->throw_exception( "No such column ${f_key} on foreign class ${f_class} ($guess)" ) if $f_class_loaded && !$f_class->has_column($f_key);