Collection field vp works again.
matthewt [Sat, 2 Feb 2008 16:12:31 +0000 (16:12 +0000)]
lib/Reaction/UI/ViewPort/Field/Collection.pm

index 8c46952..b772e02 100644 (file)
@@ -6,6 +6,18 @@ use aliased 'Reaction::UI::ViewPort::Field::Array';
 
 class Collection is Array, which {
 
+  has value => (
+    is => 'rw', lazy_build => 1,
+    isa => 'Reaction::InterfaceModel::Collection'
+  );
+
+  implements _build_value_names => as {
+    my $self = shift;
+    my $meth = $self->value_map_method;
+    my @names = map { blessed($_) ? $_->$meth : $_ } $self->value->members;
+    return [ sort @names ];
+  };
+
 };
 
 1;