aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Reaction/UI/Widget/ActionForm.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Reaction/UI/Widget/ActionForm.pm')
-rw-r--r--lib/Reaction/UI/Widget/ActionForm.pm10
1 files changed, 8 insertions, 2 deletions
diff --git a/lib/Reaction/UI/Widget/ActionForm.pm b/lib/Reaction/UI/Widget/ActionForm.pm
index 7da47eb..2f587e9 100644
--- a/lib/Reaction/UI/Widget/ActionForm.pm
+++ b/lib/Reaction/UI/Widget/ActionForm.pm
@@ -3,14 +3,20 @@ package Reaction::UI::Widget::ActionForm;
use Reaction::UI::WidgetClass;
class ActionForm, which {
- fragment widget [ qw/header field_list buttons footer/ ];
+ fragment widget [ qw/header field_list buttons footer/ ]
+ => {id => sub { $_{viewport}->location } };
fragment field_list [field => over func('viewport','ordered_fields')];
fragment field [ 'viewport' ];
#move button logic here
fragment buttons [ string {"DUMMY"} ],
- {message => sub{ $_{viewport}->can('message') ? $_{viewport}->message : "" } };
+ { message => sub{ $_{viewport}->can('message') ? $_{viewport}->message : "" },
+ ok_label => func(viewport => 'ok_label'),
+ close_label => func(viewport => 'close_label'),
+ apply_label => func(viewport => 'apply_label'),
+ };
+
fragment header [ string {"DUMMY"} ];
fragment footer [ string {"DUMMY"} ];