- grep { !exists $updates->{$_} && !exists $fixed_fields{$_} }
- $source->primary_columns;
- if ( !$object && !scalar @missing ) {
+ grep {
+ ( !exists $updates->{$_}
+ || ( exists $updates->{$_} && !defined $updates->{$_} ) )
+ && !exists $fixed_fields{$_}
+ } $source->primary_columns;
+
+ # warn "MISSING: " . join(', ', @missing) . "\n";
+ if ( !defined $object && scalar @missing == 0 ) {