X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FReaction%2FUI%2FWidget%2FActionForm.pm;h=fc2df18623caed20d47fade54bd832e6f132d0ce;hb=1ffe4ac8c3121d8e519403ccbcc4c2245947c790;hp=484453cb703aca514322379f4a9a3630212faaec;hpb=9de685fc288409d8b92e41f1e23b67562ea407f8;p=catagits%2FReaction.git diff --git a/lib/Reaction/UI/Widget/ActionForm.pm b/lib/Reaction/UI/Widget/ActionForm.pm index 484453c..fc2df18 100644 --- a/lib/Reaction/UI/Widget/ActionForm.pm +++ b/lib/Reaction/UI/Widget/ActionForm.pm @@ -3,12 +3,14 @@ package Reaction::UI::Widget::ActionForm; use Reaction::UI::WidgetClass; class ActionForm, which { - widget renders [qw/header fields buttons footer/ - => { viewport => func('self','viewport') } ]; + widget renders [ qw/header fields buttons footer/ ]; - fields renders [viewport over func('self','ordered_fields')]; + fields renders [field over func('viewport','ordered_fields')]; + field renders [ 'viewport' ]; - buttons renders [ string {"DUMMY"} ], {message => func('viewport','message'); + #move button logic here + buttons renders [ string {"DUMMY"} ], + {message => sub{ $_{viewport}->can('message') ? $_{viewport}->message : "" } }; header renders [ string {"DUMMY"} ]; footer renders [ string {"DUMMY"} ]; @@ -18,45 +20,43 @@ class ActionForm, which { __END__; -=for layout widget +=head1 NAME -
+Reaction::UI::Widget::ActionForm -=for layout header +=head1 DESCRIPTION -