SL::DB::Contact->detach nicht automatisch speichern lassen

diff --git a/SL/DB/Contact.pm b/SL/DB/Contact.pm
index 4b6c35e..d891f07 100644 (file)
--- a/SL/DB/Contact.pm
+++ b/SL/DB/Contact.pm
@@ -32,7 +32,7 @@ sub used {
 
 sub detach {
   $_[0]->cp_cv_id(undef);
-  $_[0]->save;
+  $_[0];
 }
 
 sub full_name {

diff --git a/bin/mozilla/ct.pl b/bin/mozilla/ct.pl
index 5a579e9..3cafbd9 100644 (file)
--- a/bin/mozilla/ct.pl
+++ b/bin/mozilla/ct.pl
@@ -743,7 +743,7 @@ sub delete_contact {
     my $contact = SL::DB::Manager::Contact->find_by(cp_id => $::form->{cp_id});
 
     if ($contact->used) {
-      $contact->detach;
+      $contact->detach->save;
       flash('info', $::locale->text('Contact is in use and was flagged invalid.'));
     } else {
       $contact->delete;