Ansprechpersonen-CVars auch beim Updaten speichern

Beim Neuanlegen wurden sie schon geschrieben, weil da in den Objekten
noch keine ID vorhanden ist. Bei existierenden Objekten muss aber das
Mutterobjekt mit cascade=>1 gespeichert werden, damit modifizierte
Relationships auch gespeichert werden.

diff --git a/SL/Controller/CustomerVendor.pm b/SL/Controller/CustomerVendor.pm
index 1dfa6ae..3e6ad82 100644 (file)
--- a/SL/Controller/CustomerVendor.pm
+++ b/SL/Controller/CustomerVendor.pm
@@ -140,7 +140,7 @@ sub _save {
 
     $self->{contact}->cp_cv_id($self->{cv}->id);
     if( $self->{contact}->cp_name ne '' || $self->{contact}->cp_givenname ne '' ) {
-      $self->{contact}->save();
+      $self->{contact}->save(cascade => 1);
     }
 
     if( $self->{note}->subject ne '' && $self->{note}->body ne '' ) {