Revision 4cf0100e
Von Moritz Bunkus vor etwa 14 Jahren hinzugefügt
| SL/CVar.pm | ||
|---|---|---|
| 224 | 224 |
$cvar->{OPTIONS} = [ map { { 'value' => $_ } } split(m/\#\#/, $cvar->{options}) ];
|
| 225 | 225 |
} |
| 226 | 226 |
|
| 227 |
my $act_var;
|
|
| 227 |
my ($act_var, $valid);
|
|
| 228 | 228 |
if ($params{trans_id}) {
|
| 229 | 229 |
my @values = (conv_i($cvar->{id}), conv_i($params{trans_id}));
|
| 230 | 230 |
push @values, $params{sub_module} if $params{sub_module};
|
| ... | ... | |
| 232 | 232 |
do_statement($form, $h_var, $q_var, @values); |
| 233 | 233 |
$act_var = $h_var->fetchrow_hashref(); |
| 234 | 234 |
|
| 235 |
$act_var->{valid} = $self->get_custom_variables_validity(config_id => $cvar->{id}, trans_id => $params{trans_id});
|
|
| 235 |
$valid = $self->get_custom_variables_validity(config_id => $cvar->{id}, trans_id => $params{trans_id});
|
|
| 236 | 236 |
} |
| 237 | 237 |
|
| 238 | 238 |
if ($act_var) {
|
| ... | ... | |
| 241 | 241 |
: $cvar->{type} eq 'number' ? $act_var->{number_value}
|
| 242 | 242 |
: $cvar->{type} eq 'bool' ? $act_var->{bool_value}
|
| 243 | 243 |
: $act_var->{text_value};
|
| 244 |
$cvar->{valid} = $act_var->{valid};
|
|
| 244 |
$cvar->{valid} = $valid;
|
|
| 245 | 245 |
} else {
|
| 246 | 246 |
$cvar->{valid} = 1;
|
| 247 | 247 |
|
Auch abrufbar als: Unified diff
Benutzerdefinierte Variablen: bei nicht existierenden die Defaultwerte wieder nutzen