package Maypole::Model::CDBI::AsForm;
-
-use Class::C3;
use strict;
use warnings;
for my $object (@$items) {
my $stringify = $args->{stringify};
if ($object->can('stringify_column') ) {
- $stringify ||= $object->stringify_column if ($object->can($object->stringify_column));
+ $stringify ||= $object->stringify_column if ($object->stringify_column && $object->can($object->stringify_column));
}
my $id = $object->id;
my $opt = HTML::Element->new("option", value => $id);