X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSQL%2FTranslator%2FParser%2FDBIx%2FClass.pm;h=92a620432c7cf9779850613c1f34dfe56877ba4b;hb=880a1a0cc6a48a3165656fe5daf7ec288901c3e2;hp=53e36efa88dea229b8e9bc883ba5fb19c4aa35be;hpb=27f01d1f4fc106e0d27a13c6f6c9d5fa131e9447;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/SQL/Translator/Parser/DBIx/Class.pm b/lib/SQL/Translator/Parser/DBIx/Class.pm index 53e36ef..92a6204 100644 --- a/lib/SQL/Translator/Parser/DBIx/Class.pm +++ b/lib/SQL/Translator/Parser/DBIx/Class.pm @@ -22,7 +22,7 @@ use base qw(Exporter); # ------------------------------------------------------------------- # parse($tr, $data) # -# Note that $data, in the case of this parser, is unuseful. +# Note that $data, in the case of this parser, is not useful. # We're working with DBIx::Class Schemas, not data streams. # ------------------------------------------------------------------- sub parse { @@ -80,7 +80,7 @@ sub parse { next if(!exists $rel_info->{attrs}{accessor} || $rel_info->{attrs}{accessor} eq 'multi'); # Going by the accessor type isn't such a good idea (yes, I know - # I suggested it). I think the best way to tell if something's a + # I suggested it). I think the best way to tell if something is a # foreign key constraint is to assume if it doesn't include our # primaries then it is (dumb but it'll do). Ignore any rel cond # that isn't a straight hash, but get both sets of keys in full