X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9ba3a010bca395410803067324c1924cabf956b4..e14cb525c640cb15bb6b2dfb62ccebbe78cb45cd:/SL/DB/Contact.pm?ds=inline diff --git a/SL/DB/Contact.pm b/SL/DB/Contact.pm index 4b6c35e42..565566a19 100644 --- a/SL/DB/Contact.pm +++ b/SL/DB/Contact.pm @@ -14,6 +14,8 @@ use SL::DB::Helper::CustomVariables ( # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. __PACKAGE__->meta->make_manager_class; +__PACKAGE__->meta->initialize; + sub used { my ($self) = @_; @@ -32,7 +34,7 @@ sub used { sub detach { $_[0]->cp_cv_id(undef); - $_[0]->save; + $_[0]; } sub full_name {