+sub _set_cvar_validity {
+ my ($self) = @_;
+
+ my $flags = {
+ map { split m/=/, $_, 2 }
+ split m/:/, ($self->config->flags || '')
+ };
+
+ # nothing to do to set valid
+ return if !$flags->{defaults_to_invalid};
+
+ my $all_parts = SL::DB::Manager::Part->get_all(where => [ or => [ obsolete => 0, obsolete => undef ] ]);
+ foreach my $part (@{ $all_parts }) {
+ SL::DB::CustomVariableValidity->new(config_id => $self->config->id, trans_id => $part->id)->save;
+ }
+}
+