X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/bc71c253714824c3f1bd5749958302dce5555762..a5a7ff06d7ed7396e2efbe778c961e2784cb771b:/SL/CVar.pm diff --git a/SL/CVar.pm b/SL/CVar.pm index d50f2fa13..a55cdf439 100644 --- a/SL/CVar.pm +++ b/SL/CVar.pm @@ -334,9 +334,11 @@ sub save_custom_variables { do_statement($form, $sth, $query, @values); - $self->save_custom_variables_validity(trans_id => $params{trans_id}, config_id => $config->{id}, - validity => ($params{variables}->{"$params{name_prefix}cvar_$config->{name}$params{name_postfix}_valid"} ? 1 : 0) - ); + unless ($params{always_valid}) { + $self->save_custom_variables_validity(trans_id => $params{trans_id}, config_id => $config->{id}, + validity => ($params{variables}->{"$params{name_prefix}cvar_$config->{name}$params{name_postfix}_valid"} ? 1 : 0) + ); + }; } $sth->finish();