Revision d416d4c4
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
| SL/IR.pm | ||
|---|---|---|
| 1250 | 1250 |
# remove id and taxincluded before copy back |
| 1251 | 1251 |
delete @$ref{qw(id taxincluded)};
|
| 1252 | 1252 |
|
| 1253 |
@wanted_vars = grep({ $_ } @wanted_vars);
|
|
| 1253 | 1254 |
if (scalar(@wanted_vars) > 0) {
|
| 1254 | 1255 |
my %h_wanted_vars; |
| 1255 | 1256 |
map({ $h_wanted_vars{$_} = 1; } @wanted_vars);
|
| SL/IS.pm | ||
|---|---|---|
| 417 | 417 |
# remove id and taxincluded before copy back |
| 418 | 418 |
delete @$ref{qw(id taxincluded)};
|
| 419 | 419 |
|
| 420 |
@wanted_vars = grep({ $_ } @wanted_vars);
|
|
| 420 | 421 |
if (scalar(@wanted_vars) > 0) {
|
| 421 | 422 |
my %h_wanted_vars; |
| 422 | 423 |
map({ $h_wanted_vars{$_} = 1; } @wanted_vars);
|
Auch abrufbar als: Unified diff
Undefinierte Werte aus der Liste der "gewollten Variablen" rauswerfen, weil die Liste ansonsten eventuell nicht leer ist.