X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/333c3b918b2a1aead73151eca91a70f3b5c8ca11..b8fa93b5d2cfff453fd8a82206d1a288407a8be6:/SL/Form.pm?ds=inline diff --git a/SL/Form.pm b/SL/Form.pm index 7414cdb4c..e5b1e7459 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -1872,7 +1872,7 @@ sub add_shipto { my @values; foreach my $item (qw(name department_1 department_2 street zipcode city country gln - contact cp_gender phone fax email)) { + contact phone fax email)) { if ($self->{"shipto$item"}) { $shipto = 1 if ($self->{$item} ne $self->{"shipto$item"}); }