[catagits/Reaction.git] / lib / Reaction / UI / Widget / Object.pm

package Reaction::UI::Widget::Object;

use Reaction::UI::WidgetClass;

class Object, which {

  implements fragment field_list {
    render field => over $_{viewport}->fields;
  };

  implements fragment field {
    render 'viewport';
  };

};

1;

__END__;

=head1 NAME

Reaction::UI::Widget::Object

=head1 DESCRIPTION

=head1 FRAGMENTS

=head2 field_list

Sequentially renders the C<fields> of the viewport in the C<computed_field_order>

=head2 field

Renders the C<field> viewport passed by C<field_list>

=head1 AUTHORS

See L<Reaction::Class> for authors.

=head1 LICENSE

See L<Reaction::Class> for the license.

=cut
Commit	Line	Data
2f670e13	1	package Reaction::UI::Widget::Object;
7b78a39d	2
	3	use Reaction::UI::WidgetClass;
	4
2f670e13	5	class Object, which {
d7b00a50	6
d7b00a50	7	implements fragment field_list {
c03f75a7	8	render field => over $_{viewport}->fields;
d7b00a50	9	};
	10
	11	implements fragment field {
	12	render 'viewport';
	13	};
	14
7b78a39d	15	};
	16
	17	1;
	18
	19	__END__;
	20
5a1a893e	21	=head1 NAME
7b78a39d	22
2f670e13	23	Reaction::UI::Widget::Object
7b78a39d	24
5a1a893e	25	=head1 DESCRIPTION
	26
	27	=head1 FRAGMENTS
	28
6bc27bd3	29	=head2 field_list
5a1a893e	30
cc44a337	31	Sequentially renders the C<fields> of the viewport in the C<computed_field_order>
5a1a893e	32
49170400	33	=head2 field
	34
	35	Renders the C<field> viewport passed by C<field_list>
	36
5a1a893e	37	=head1 AUTHORS
	38
	39	See L<Reaction::Class> for authors.
	40
	41	=head1 LICENSE
	42
	43	See L<Reaction::Class> for the license.
7b78a39d	44
7b78a39d	45	=cut