X-Git-Url: https://git.decadent.org.uk/gitweb/?p=maypole.git;a=blobdiff_plain;f=lib%2FMaypole%2FModel%2FCDBI%2FDFV.pm;h=5a74f71848433e00038c55390045806cbffd7702;hp=eb2bf20668834329b18f692042fa03ae13c931f5;hb=753bfd73e7faf3e0cd8ec2468208d4f40dbfd997;hpb=6cd7a25572c93242146d8d8ce0eb3f2bbb76917e

diff --git a/lib/Maypole/Model/CDBI/DFV.pm b/lib/Maypole/Model/CDBI/DFV.pm
index eb2bf20..5a74f71 100644
--- a/lib/Maypole/Model/CDBI/DFV.pm
+++ b/lib/Maypole/Model/CDBI/DFV.pm
@@ -190,7 +190,8 @@ sub _do_update {
       # get related object if it exists
       my $rel_meta = $class->related_meta('r',$accssr);
       if (!$rel_meta) {
-	$class->_croak("No relationship for $accssr in " . ref($class));
+	$class->_carp("No relationship for $accssr in " . ref($class));
+	next;
       }
 
       my $rel_type  = $rel_meta->{name};
@@ -256,7 +257,8 @@ sub _create_related {
   my $created = [];
   my $rel_meta = $self->related_meta('r',$accssr);
   if (!$rel_meta) {
-    $self->_croak("No relationship for $accssr in " . ref($self));
+    $self->_carp("No relationship for $accssr in " . ref($self));
+    return;
   }
 
   my $rel_type  = $rel_meta->{name};