sub adopt {
my ($self, $child) = @_;
$child->autoupdate(1);
- $child->columns( Stringify => qw/ name / );
+ if (grep { $_ eq "name" } $child->columns) { # Common case
+ $child->columns( Stringify => qw/ name / );
+ } # Otherwise, work it out for yourself.
}
sub search :Exported {