r15374@deathmachine (orig r423): edenc | 2007-12-17 13:43:38 -0500
[catagits/Reaction.git] / lib / Reaction / UI / Widget / DisplayField / Collection.pm
index c4c16e7..40bedd3 100644 (file)
@@ -3,10 +3,19 @@ package Reaction::UI::Widget::DisplayField::Collection;
 use Reaction::UI::WidgetClass;
 
 class Collection, which {
-  widget renders [ qw/label list/ ];
-  label  renders [ string { $_{viewport}->label } ];
-  list   renders [ item over func('viewport', 'value_names') ];
-  item   renders [ string { $_ } ];
+
+  before fragment widget {
+    arg 'label' => $_{viewport}->label;
+  };
+
+  implements fragment list {
+    render 'item' => over $_{viewport}->value_names;
+  };
+
+  implements fragment item {
+    arg 'name' => $_;
+  };
+
 };
 
 1;