[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 widget

Renders C<field_list>

=head2 field_list

Sequentially renders the C<ordered_fields> of the viewport.

=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
7b78a39d	21
5a1a893e	22	=head1 NAME
7b78a39d	23
2f670e13	24	Reaction::UI::Widget::Object
7b78a39d	25
5a1a893e	26	=head1 DESCRIPTION
	27
	28	=head1 FRAGMENTS
	29
	30	=head2 widget
	31
2f670e13	32	Renders C<field_list>
5a1a893e	33
6bc27bd3	34	=head2 field_list
5a1a893e	35
2f670e13	36	Sequentially renders the C<ordered_fields> of the viewport.
5a1a893e	37
	38	=head1 AUTHORS
	39
	40	See L<Reaction::Class> for authors.
	41
	42	=head1 LICENSE
	43
	44	See L<Reaction::Class> for the license.
7b78a39d	45
7b78a39d	46	=cut