package Maypole::Model::CDBI::FromCGI;
-use Class::C3;
use strict;
use warnings;
$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};