X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fct.pl;h=b25509ec6c0c8ddbd350f2791feaa12491b25329;hb=cdacfe1cb5156c4bde158f0592d1dd3c445be7dd;hp=16077a8b95a11d7318d80acfb5aa80f55e9974c6;hpb=0bf9f21482c4581f8cea90cc8d847f876682302f;p=kivitendo-erp.git diff --git a/bin/mozilla/ct.pl b/bin/mozilla/ct.pl index 16077a8b9..b25509ec6 100644 --- a/bin/mozilla/ct.pl +++ b/bin/mozilla/ct.pl @@ -184,8 +184,14 @@ sub list_names { map { $column_defs{$_}->{visible} = $form->{"l_$_"} eq 'Y' } @columns; - my @hidden_variables = (qw(db status obsolete name contact email cp_name addr_street addr_zipcode addr_city business_id), - "$form->{db}number", @searchable_custom_variables, map { "l_$_" } @columns); + my @hidden_variables = ( qw( + db status obsolete name contact email cp_name addr_street addr_zipcode + addr_city business_id + ), "$form->{db}number", + map({ "cvar_$_->{name}" } @searchable_custom_variables), + map({ "l_$_" } @columns), + ); + my @hidden_nondefault = grep({ $form->{$_} } @hidden_variables); my $callback = build_std_url('action=list_names', grep { $form->{$_} } @hidden_nondefault); $form->{callback} = "$callback&sort=" . E($form->{sort}) . "&sortdir=" . E($form->{sortdir}); @@ -711,7 +717,7 @@ sub delete_contact { CT->get_contact(\%myconfig, \%$form); unless ($form->{cp_used}) { - CT->delete_shipto($form->{cp_id}); + CT->delete_contact($form->{cp_id}); @$form{ grep /^cp_/, keys %$form } = undef; }