diff --git a/lib/WebGUI/Asset/Wobject/Layout.pm b/lib/WebGUI/Asset/Wobject/Layout.pm index 7d870ffdf..6ec0f5cdb 100644 --- a/lib/WebGUI/Asset/Wobject/Layout.pm +++ b/lib/WebGUI/Asset/Wobject/Layout.pm @@ -77,32 +77,6 @@ These methods are available from this class: -#------------------------------------------------------------------- - -=head2 definition ( definition ) - -Defines the properties of this asset. - -=head3 definition - -A hash reference passed in from a subclass definition. - -=cut - -sub definition { - my $class = shift; - my $session = shift; - my $definition = shift; - my $i18n = WebGUI::International->new($session,"Asset_Layout"); - - push(@{$definition}, { - properties=>{ - } - }); - return $class->SUPER::definition($session, $definition); -} - - #------------------------------------------------------------------- =head2 getEditForm ( ) diff --git a/lib/WebGUI/Asset/Wobject/SQLReport.pm b/lib/WebGUI/Asset/Wobject/SQLReport.pm index ab1f99500..b3cc5612e 100644 --- a/lib/WebGUI/Asset/Wobject/SQLReport.pm +++ b/lib/WebGUI/Asset/Wobject/SQLReport.pm @@ -242,24 +242,6 @@ sub _downloadUserGroup_default { } -#------------------------------------------------------------------- -sub definition { - my $class = shift; - my $session = shift; - my $definition = shift; - my $i18n = WebGUI::International->new($session,"Asset_SQLReport"); - my %properties; - tie %properties, 'Tie::IxHash'; - %properties = ( - ); - push(@{$definition}, { - className=>'WebGUI::Asset::Wobject::SQLReport', - properties => \%properties, - autoGenerateForms => 0, - }); - return $class->SUPER::definition($session, $definition); -} - #------------------------------------------------------------------- =head2 getContentLastModified ( ) diff --git a/lib/WebGUI/Asset/Wobject/StockData.pm b/lib/WebGUI/Asset/Wobject/StockData.pm index 28b9996ba..f2e61bdad 100644 --- a/lib/WebGUI/Asset/Wobject/StockData.pm +++ b/lib/WebGUI/Asset/Wobject/StockData.pm @@ -287,34 +287,6 @@ sub _trim { #------------------------------------------------------------------- -=head2 definition ( ) - -defines wobject properties for Stock Data instances - -=cut - -sub definition { - my $class = shift; - my $session = shift; - my $definition = shift; - my $i18n = WebGUI::International->new($session,"Asset_StockData"); - - my %properties; - tie %properties, 'Tie::IxHash'; - %properties = ( - - ); - - push(@{$definition}, { - autoGenerateForms=>1, - properties=>\%properties - }); - - return $class->SUPER::definition($session, $definition); -} - -#------------------------------------------------------------------- - =head2 prepareView ( ) See WebGUI::Asset::prepareView() for details. diff --git a/lib/WebGUI/Asset/Wobject/Survey.pm b/lib/WebGUI/Asset/Wobject/Survey.pm index 4cf40867d..4035bb500 100644 --- a/lib/WebGUI/Asset/Wobject/Survey.pm +++ b/lib/WebGUI/Asset/Wobject/Survey.pm @@ -243,37 +243,6 @@ END_WARN #------------------------------------------------------------------- -=head2 definition ( session, [definition] ) - -Returns an array reference of definitions. Adds tableName, className, properties to array definition. - -=head3 definition - -An array of hashes to prepend to the list - -=cut - -sub definition { - my $class = shift; - my $session = shift; - my $definition = shift; - my $i18n = WebGUI::International->new( $session, 'Asset_Survey' ); - my %properties; - tie %properties, 'Tie::IxHash'; ## no critic - %properties = ( - # Properties Tab - ); - - push @{$definition}, { - className => 'WebGUI::Asset::Wobject::Survey', - properties => \%properties - }; - - return $class->SUPER::definition( $session, $definition ); -} - -#------------------------------------------------------------------- - =head2 surveyJSON_update ( ) Convenience method that delegates to L diff --git a/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm b/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm index 6575fae7f..18849971d 100644 --- a/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm +++ b/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm @@ -95,33 +95,6 @@ These methods are available from this class: =cut -#------------------------------------------------------------------- - -=head2 definition ( definition ) - -Defines the properties of this asset. - -=head3 definition - -A hash reference passed in from a subclass definition. - -=cut - -sub definition { - my $class = shift; - my $session = shift; - my $definition = shift; - my %properties; - tie %properties, 'Tie::IxHash'; - my $i18n = WebGUI::International->new($session,'Asset_SyndicatedContent'); - %properties = ( - ); - push(@{$definition}, { - properties=>\%properties - }); - return $class->next::method($session, $definition); -} - #------------------------------------------------------------------- =head2 generateFeed () diff --git a/lib/WebGUI/Asset/Wobject/TimeTracking.pm b/lib/WebGUI/Asset/Wobject/TimeTracking.pm index 158b02984..f91d7ab1d 100644 --- a/lib/WebGUI/Asset/Wobject/TimeTracking.pm +++ b/lib/WebGUI/Asset/Wobject/TimeTracking.pm @@ -67,29 +67,6 @@ property pmIntegration => ( use WebGUI::Asset::Wobject::ProjectManager; -#------------------------------------------------------------------- - -=head2 definition - -=cut - -sub definition { - my $class = shift; - my $session = shift; - my $definition = shift; - my $i18n = WebGUI::International->new($session,'Asset_TimeTracking'); - my %properties; - tie %properties, 'Tie::IxHash'; - %properties = ( - ); - push(@{$definition}, { - className=>'WebGUI::Asset::Wobject::TimeTracking', - properties=>\%properties - }); - return $class->SUPER::definition($session, $definition); -} - - #------------------------------------------------------------------- =head2 prepareView