X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FRelationship%2FBelongsTo.pm;h=535fa751f1541249e191cd55a096f4f9a1f508ab;hb=75d079145a507a0e5ff89b2676d383f4fd1a5511;hp=ef2506914fc6046c6a1d6667bbcab891a120b03e;hpb=884559b13fe244d3e446d127e9fd21ea8d7c6eb3;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Relationship/BelongsTo.pm b/lib/DBIx/Class/Relationship/BelongsTo.pm index ef25069..535fa75 100644 --- a/lib/DBIx/Class/Relationship/BelongsTo.pm +++ b/lib/DBIx/Class/Relationship/BelongsTo.pm @@ -18,9 +18,9 @@ sub belongs_to { my ($pri, $too_many) = keys %f_primaries; $class->throw_exception("Can't infer join condition for ${rel} on ${class}; ${f_class} has no primary keys") - unless defined $pri; + unless defined $pri; $class->throw_exception("Can't infer join condition for ${rel} on ${class}; ${f_class} has multiple primary keys") - if $too_many; + if $too_many; my $fk = defined $cond ? $cond : $rel; $class->throw_exception("Can't infer join condition for ${rel} on ${class}; $fk is not a column")