X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FModel%2FCDBI%2FFromCGI.pm;h=217570acfc2d51b18bd53cc682070cd3ebddd839;hb=1ec67be9e8b738cbd2a523523af3bd7e61f98480;hp=df0b9ffa63e4c666754f666f5c7a146f37338f4d;hpb=753bfd73e7faf3e0cd8ec2468208d4f40dbfd997;p=maypole.git diff --git a/lib/Maypole/Model/CDBI/FromCGI.pm b/lib/Maypole/Model/CDBI/FromCGI.pm index df0b9ff..217570a 100644 --- a/lib/Maypole/Model/CDBI/FromCGI.pm +++ b/lib/Maypole/Model/CDBI/FromCGI.pm @@ -1,5 +1,4 @@ package Maypole::Model::CDBI::FromCGI; -use Class::C3; use strict; use warnings; @@ -514,7 +513,7 @@ sub _create_related { $created ||= []; my $rel_meta = $self->related_meta('r',$accssr); if (!$rel_meta) { - $self->_carp("No relationship for $accssr in " . ref($self)); + $self->_carp("[_create_related] No relationship for $accssr in " . ref($self)); return; } my $rel_type = $rel_meta->{name};