From: Moritz Bunkus Date: Fri, 19 Jan 2007 13:36:12 +0000 (+0000) Subject: Undefinierte Werte aus der Liste der "gewollten Variablen" rauswerfen, weil die Liste... X-Git-Tag: release-2.4.2~271 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=d416d4c43db74a0812d74834d078df9e0d2921a6;p=kivitendo-erp.git Undefinierte Werte aus der Liste der "gewollten Variablen" rauswerfen, weil die Liste ansonsten eventuell nicht leer ist. --- diff --git a/SL/IR.pm b/SL/IR.pm index a6f66659e..3ebae9653 100644 --- a/SL/IR.pm +++ b/SL/IR.pm @@ -1250,6 +1250,7 @@ sub vendor_details { # remove id and taxincluded before copy back delete @$ref{qw(id taxincluded)}; + @wanted_vars = grep({ $_ } @wanted_vars); if (scalar(@wanted_vars) > 0) { my %h_wanted_vars; map({ $h_wanted_vars{$_} = 1; } @wanted_vars); diff --git a/SL/IS.pm b/SL/IS.pm index cc8027b9a..1a36e2c9a 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -417,6 +417,7 @@ sub customer_details { # remove id and taxincluded before copy back delete @$ref{qw(id taxincluded)}; + @wanted_vars = grep({ $_ } @wanted_vars); if (scalar(@wanted_vars) > 0) { my %h_wanted_vars; map({ $h_wanted_vars{$_} = 1; } @wanted_vars);