X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema%2FLoader%2FDBI%2FPg.pm;h=512220ca89028f44131c984b75e279a122b37e83;hb=c34033b1f21ade200b20f78940c2c32a8843fd17;hp=462431150d4ad414bbb91a01f77c1254371c84d1;hpb=958d5fcfc75fc334524e17147b07fb5acfdfee26;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/lib/DBIx/Class/Schema/Loader/DBI/Pg.pm b/lib/DBIx/Class/Schema/Loader/DBI/Pg.pm index 4624311..512220c 100644 --- a/lib/DBIx/Class/Schema/Loader/DBI/Pg.pm +++ b/lib/DBIx/Class/Schema/Loader/DBI/Pg.pm @@ -5,7 +5,7 @@ use warnings; use base 'DBIx::Class::Schema::Loader::DBI::Component::QuotedDefault'; use mro 'c3'; -our $VERSION = '0.07026'; +our $VERSION = '0.07032'; =head1 NAME @@ -83,9 +83,11 @@ EOF schema => $remote_schema, ) unless exists $rels{$fk}{remote_table}; - $rels{$fk}{attrs}{on_delete} = uc $delete_rule; - $rels{$fk}{attrs}{on_update} = uc $update_rule; - $rels{$fk}{attrs}{is_deferrable} = uc $is_deferrable eq 'YES' ? 1 : 0; + $rels{$fk}{attrs} ||= { + on_delete => uc $delete_rule, + on_update => uc $update_rule, + is_deferrable => uc $is_deferrable eq 'YES' ? 1 : 0, + }; } return [ values %rels ];