Form inheritance work for lists, removal of $session{os}{slash}

This commit is contained in:
Colin Kuskie 2005-12-01 20:46:55 +00:00
parent abe85d439e
commit 99df1f414e
90 changed files with 1364 additions and 1168 deletions

View file

@ -39,17 +39,23 @@ The following methods are specifically available from this class. Check the supe
#-------------------------------------------------------------------
=head2 getName ()
=head2 definition ( )
Returns the human readable name or type of this form control.
See the super class for additional details.
=cut
sub getName {
return WebGUI::International::get("submit","WebGUI");
sub definition {
my $class = shift;
my $definition = shift || [];
push(@{$definition}, {
formName=>{
defaultValue=>WebGUI::International::get("submit","WebGUI")
},
});
return $class->SUPER::definition($definition);
}
#-------------------------------------------------------------------
=head2 toHtml ( )