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

diff --git a/SL/DB/Contact.pm b/SL/DB/Contact.pm
index 4b6c35e42e3c160b47790aed7cda9b36db491482..d891f0781e1e7274cb4a6011dc923c32d7bcecdf 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 5a579e92afbd067c2ab436572c39eeeb1d5f3fa9..3cafbd93fdf95c2672737d306e6312035bcc6364 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;