Revision ad2e3220
Von Sven Schöling vor mehr als 14 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
| 2077 | 2077 |
my $form = $main::form; |
| 2078 | 2078 |
|
| 2079 | 2079 |
$form->{CVAR_CONFIGS} ||= { };
|
| 2080 |
$form->{CVAR_CONFIGS}->{IC} = CVar->get_configs(module => 'IC');
|
|
| 2080 |
$form->{CVAR_CONFIGS}->{IC} ||= CVar->get_configs(module => 'IC');
|
|
| 2081 | 2081 |
|
| 2082 | 2082 |
$main::lxdebug->leave_sub(); |
| 2083 | 2083 |
} |
| ... | ... | |
| 2094 | 2094 |
return; |
| 2095 | 2095 |
} |
| 2096 | 2096 |
|
| 2097 |
my $valid = CVar->custom_variables_validity_by_trans_id(trans_id => $params{part_id});
|
|
| 2098 |
|
|
| 2097 | 2099 |
my $num_visible_cvars = 0; |
| 2098 | 2100 |
foreach my $cvar (@{ $form->{CVAR_CONFIGS}->{IC} }) {
|
| 2099 |
$cvar->{valid} = $params{part_id} &&
|
|
| 2100 |
CVar->get_custom_variables_validity(config_id => $cvar->{id}, trans_id => $params{part_id});
|
|
| 2101 |
$cvar->{valid} = $params{part_id} && $valid->($cvar->{id});
|
|
| 2101 | 2102 |
|
| 2102 | 2103 |
my $description = ''; |
| 2103 | 2104 |
if ($cvar->{flag_editable} && $cvar->{valid}) {
|
Auch abrufbar als: Unified diff
CVar validity ausgelagert in eine Massenfunktion.
Reduziert die Anzahl der Datenbankzugriffe bei großen Belegen massiv.