File Coverage

blib/lib/HTML/FormEngine/SkinClassic.pm

Criterion	Covered	Total	%
statement	17	19	89.4
branch			n/a
condition			n/a
subroutine	4	5	80.0
pod			n/a
total	21	24	87.5

=head1 NAME

HTML::FormEngine::SkinClassic - the standard FormEngine skin

=head1 ABOUT

This is the default skin of FormEngine. It is based on the skin class
HTML::FormEngine::SkinComplex.

To understand the diffrence between I and I
read the source code and L.

=cut

######################################################################

package HTML::FormEngine::SkinClassic;

use strict;
use vars qw(@ISA);
use HTML::FormEngine::SkinComplex;
@ISA = qw(HTML::FormEngine::SkinComplex);

######################################################################

#NOTE: its important that templates which do not implement a certain field but are of a generic type (reuseable) begin with _, else the seperate algorithm does not work

sub _get_templ {
  my %skin = %{HTML::FormEngine::SkinComplex::_get_templ(@_)};

  $skin{_row} = '



';

  $skin{_row_notitle} = '


';

  $skin{_row_notitle_noerror} = '

';

  $skin{_row_noerror} = '


';

  #_row_error_nl
  $skin{_row2} = '





';

  return \%skin;
}


sub _get_confirm_skin {
  require HTML::FormEngine::SkinClassicConfirm;
  return new HTML::FormEngine::SkinClassicConfirm;
}

1;

__END__