X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lib%2FMaypole%2FModel%2FCDBI%2FAsForm.pm;h=cad330c1193ac5961aebd9055780d1edeffc6e62;hb=650450caf089b65793c46ff38aa696337f4005df;hp=06f1039f3f1da76866a975733e63dbd0efb9909b;hpb=2c5d6782f89dc1532398b1b79c8f67b982c758ac;p=maypole.git

diff --git a/lib/Maypole/Model/CDBI/AsForm.pm b/lib/Maypole/Model/CDBI/AsForm.pm
index 06f1039..cad330c 100644
--- a/lib/Maypole/Model/CDBI/AsForm.pm
+++ b/lib/Maypole/Model/CDBI/AsForm.pm
@@ -1179,7 +1179,7 @@ sub _options_from_objects {
   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);