added Tabsets. finished toHtml

This commit is contained in:
Doug Bell 2009-11-20 18:12:11 -06:00
parent db785fbc02
commit 38d395e49f
9 changed files with 166 additions and 39 deletions

View file

@ -10,5 +10,14 @@ has 'objects' => (
# Objects combines "fields", "fieldsets", and "tabsets"
sub addObject {
my ( $self, $object ) = @_;
push @{$self->objects}, $object;
return $object;
}
# Handle re-ordering of objects
1;