#$r->template_args->{classmetadata}{search_cgi} = $self->search_inputs;
}
-sub view : Exported {
- my ($self, $r, $obj) = @_;
- $self->_croak( "Object method only") unless $obj;
-
- if ($r->params->{submit}) {
- my ($pint) = $obj->add_to_from_cgi($r);
- if (my $errs = $obj->cgi_update_errors) {
- $r->template_args->{errors} = $errs;
- }
- }
-
- my %cgi = $self->to_cgi('pints');
- delete $cgi{pints}{drinker}; # = $obj->to_field(drinker => 'link_hidden', {r => $r});
- $r->template_args->{classmetadata}{cgi} = \%cgi ;
-}