SUPER handling for most of Wobject/*.pm. There's a problem with Calendar, though.

This commit is contained in:
Colin Kuskie 2010-04-08 17:00:05 -07:00
parent fd736e7f67
commit f56bac9948
18 changed files with 95 additions and 123 deletions

View file

@ -126,9 +126,9 @@ Add the data table to the edit form.
=cut
# TODO Get the DataSource's edit form
sub getEditForm {
override getEditForm => sub {
my $self = shift;
my $tabform = $self->SUPER::getEditForm(@_);
my $tabform = super();
$tabform->getTab("data")->raw(
WebGUI::Form::DataTable->new(
@ -142,7 +142,7 @@ sub getEditForm {
);
return $tabform;
} ## end sub getEditForm
}; ## end sub getEditForm
#----------------------------------------------------------------------------
@ -152,12 +152,12 @@ Add a tab for the data table.
=cut
sub getEditTabs {
override getEditTabs => sub {
my $self = shift;
my $i18n = WebGUI::International->new( $self->session, "Asset_DataTable" );
return ( $self->SUPER::getEditTabs, [ "data" => $i18n->get("tab label data") ], );
}
return ( super(), [ "data" => $i18n->get("tab label data") ], );
};
#----------------------------------------------------------------------------