--- trunk/lib/Frey/Action.pm 2009/07/02 15:56:40 1160 +++ trunk/lib/Frey/Action.pm 2009/07/02 16:53:39 1161 @@ -176,9 +176,7 @@ $html = qq|
$radio
|; } - return -# qq|| . - $html + return $html; } sub params_form { @@ -366,13 +364,24 @@ # http://www.quirksmode.org/oddsandends/forms.html # $form =~ s{<([^>]+)(name=")([^"]+)(")([^>]*)>}{<$1$2$3$4 id="$3" $5}gs; - $html = qq| -

$class params

-
- $form - -
- | if $form; + if ( $form ) { + + if ( $self->class->can('form_header') ) { + $html = $self->class->form_header; + } else { + $html = qq| +

$class params

+ |; + } + + $html .= qq| +
+ $form + +
+ |; + $html .= $self->class->form_footer if $self->class->can('form_footer'); + } $self->add_status({ $self->class => {