X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/49b00f2cc1d5fd7a536a9e30292f2eaec26ff825..3f21f766920411eeb17e21887943e6fb6ff43b5c:/SL/DB/CustomVariable.pm diff --git a/SL/DB/CustomVariable.pm b/SL/DB/CustomVariable.pm index 26ff748f7..cb6c83158 100644 --- a/SL/DB/CustomVariable.pm +++ b/SL/DB/CustomVariable.pm @@ -124,8 +124,13 @@ sub is_valid { require SL::DB::CustomVariableValidity; - my $query = [config_id => $self->config_id, trans_id => $self->trans_id]; - return (SL::DB::Manager::CustomVariableValidity->get_all_count(query => $query) == 0) ? 1 : 0; + # only base level custom variables can be invalid. ovverloaded ones could potentially clash on trans_id, so disallow them + return 1 if $self->sub_module; + + $self->{is_valid} //= do { + my $query = [config_id => $self->config_id, trans_id => $self->trans_id]; + (SL::DB::Manager::CustomVariableValidity->get_all_count(query => $query) == 0) ? 1 : 0; + } } 1;