Merge 'trunk' into 'view_support'
Peter Rabbitson [Mon, 25 Aug 2008 10:19:10 +0000 (06:19 -0400)]
r21901@martha (orig r4767):  ribasushi | 2008-08-25 05:19:10 -0400
Force on_delete/on_update arguments to upper case for consistency with the rest of SQLT

lib/SQL/Translator/Parser/DBIx/Class.pm

index 5b313ba..3e915bc 100644 (file)
@@ -208,8 +208,8 @@ sub parse {
                                     fields           => \@keys,
                                     reference_fields => \@refkeys,
                                     reference_table  => $rel_table,
-                                    on_delete        => $cascade->{delete},
-                                    on_update        => $cascade->{update},
+                                    on_delete        => uc ($cascade->{delete} || ''),
+                                    on_update        => uc ($cascade->{update} || ''),
                                     (defined $is_deferrable ? ( deferrable => $is_deferrable ) : ()),
                   );