ObjectView converted
[catagits/Reaction.git] / lib / Reaction / UI / Widget / GridView.pm
1 package Reaction::UI::Widget::GridView;
2
3 use Reaction::UI::WidgetClass;
4
5 class GridView, which {
6   fragment widget [ qw/header body footer/ ];
7
8   fragment header      [ 'header_row' ];
9   fragment header_row  [ header_cell => over func('viewport', 'field_order'),
10                         { labels => func(viewport => 'field_labels') } ];
11   fragment header_cell [ string { $_{labels}->{$_} } ], { field_name => $_ };
12
13   fragment footer      [ 'footer_row' ];
14   fragment footer_row  [ footer_cell => over func('viewport', 'field_order'),
15                         { labels => func(viewport => 'field_labels') } ];
16   fragment footer_cell [ string { $_{labels}->{$_} } ], { field_name => $_ };
17
18   fragment body        [ viewport => over func('viewport','entities')];
19
20 };
21
22 1;