X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/da1f7513fd3b86ead76b330c37209d6ed95bd853..b1acaa012f1f9a9a6ebea8bf4ae3d4f74a0feb4f:/SL/Form.pm 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"}); }