diff options
author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2007-10-02 20:05:44 +0000 |
---|---|---|
committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2007-10-02 20:05:44 +0000 |
commit | e22de1011c40b639cc4b6e5586a9e0defe855285 (patch) | |
tree | 67e007d3eee18254d0f9e3111acaedafd80e80dd /lib/Reaction/UI/Widget/ListView.pm | |
parent | 6ab43711ccd779eedce107001b300043e2056a0c (diff) | |
download | reaction-e22de1011c40b639cc4b6e5586a9e0defe855285.tar.gz reaction-e22de1011c40b639cc4b6e5586a9e0defe855285.zip |
unstable switchover before template renaming. added searchpath for widgets trying to make list view work. added gridview
Diffstat (limited to 'lib/Reaction/UI/Widget/ListView.pm')
-rw-r--r-- | lib/Reaction/UI/Widget/ListView.pm | 52 |
1 files changed, 5 insertions, 47 deletions
diff --git a/lib/Reaction/UI/Widget/ListView.pm b/lib/Reaction/UI/Widget/ListView.pm index 7d9801c..9c525ee 100644 --- a/lib/Reaction/UI/Widget/ListView.pm +++ b/lib/Reaction/UI/Widget/ListView.pm @@ -1,56 +1,14 @@ package Reaction::UI::Widget::ListView; use Reaction::UI::WidgetClass; -use aliased 'Reaction::UI::ViewPort::ListView' => 'ListView_VP'; -class ListView, which { +class ListView is 'Reaction::UI::Widget::GridView', which { +# widget renders [ qw/pager header rows footer/ +# => { viewport => func('self', 'viewport') } +# ]; - has 'viewport' => (isa => ListView_VP, is => 'ro', required => 1); - - widget renders [ - qw(header body) => { viewport => func(self => 'viewport') } - ]; - - header renders [ header_entry over func(viewport => 'field_names') ]; - - header_entry renders [ string { $_{viewport}->field_label_map->{ $_ } } ]; - - body renders [ row over func(viewport => 'current_page_collection') ]; - - row renders [ - col_entry over func(viewport => 'field_names') => { row => $_ } - ]; - - col_entry renders [ - string { - my $proto = $_{row}->$_; - if (blessed($proto) && $proto->can('display_name')) { - return $proto->display_name; - } - return "${proto}"; - } - ]; +# header_cell renders [ string { $_ } ]; }; 1; - -__END__; - -=head1 NAME - -Reaction::UI::Widget::ListView - -=head1 DESCRIPTION - -=head2 viewport - -=head1 AUTHORS - -See L<Reaction::Class> for authors. - -=head1 LICENSE - -See L<Reaction::Class> for the license. - -=cut |