X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/0e9f6f033ae78206cfa0fd56e310dd79327f99f4..b231d037:/SL/IS.pm diff --git a/SL/IS.pm b/SL/IS.pm index e9bd54d47..21bf15f74 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -2158,7 +2158,7 @@ sub get_customer { $ref = selectfirst_hashref_query($form, $dbh, $query, @values); delete $ref->{salesman_id} if !$ref->{salesman_id}; - delete $ref->{payment_id} if $form->{payment_id}; + delete $ref->{payment_id} if !$ref->{payment_id}; map { $form->{$_} = $ref->{$_} } keys %$ref;