lib/Reaction/UI/Widget/ActionForm.pm

   1 package Reaction::UI::Widget::ActionForm;
   2
   3 use Reaction::UI::WidgetClass;
   4
   5 class ActionForm, which {
   6   widget renders [qw/header fields buttons footer/
   7                   => { viewport => func('self','viewport') } ];
   8
   9   fields renders [field over func('viewport','ordered_fields')];
  10   field  renders [ 'viewport' ];
  11
  12   buttons renders [ string {"DUMMY"} ],
  13     {message => sub{ $_{viewport}->can('message') ? $_{viewport}->message : "" } };
  14   header  renders [ string {"DUMMY"} ];
  15   footer  renders [ string {"DUMMY"} ];
  16
  17 };
  18
  19 1;
  20
  21 __END__;
  22
  23 =head1 NAME
  24
  25 Reaction::UI::Widget::ActionForm
  26
  27 =head1 DESCRIPTION
  28
  29 =head1 FRAGMENTS
  30
  31 =head2 widget
  32
  33 Additional variables available in topic hash: "viewport".
  34
  35 Renders "header", "fields", "buttons" and "footer"
  36
  37 =head2 fields
  38
  39 Sequentially renders the C<ordered_fields> of the viewport
  40
  41 =head2 buttons
  42
  43 Additional variables available in topic hash: "message"
  44
  45 =head2 header
  46
  47 Content is a dummy value
  48
  49 =head2 footer
  50
  51 Content is a dummy value
  52
  53 =head1 AUTHORS
  54
  55 See L<Reaction::Class> for authors.
  56
  57 =head1 LICENSE
  58
  59 See L<Reaction::Class> for the license.
  60
  61 =cut
  62