fix fail in t/72pg.t related to new autoinc retrieval code in ::Row
Rafael Kitover [Sat, 13 Feb 2010 20:15:46 +0000 (20:15 +0000)]
lib/DBIx/Class/Row.pm

index a446426..8d0293c 100644 (file)
@@ -355,6 +355,7 @@ sub insert {
 
     my @non_pk_autoincs = grep {
       (not exists $pk{$_})
+      && (not defined $self->get_column($_))
       && $rsrc->column_info($_)->{is_auto_increment}
     } $rsrc->columns;