diff --git a/lib/WebGUI/Definition/Asset.pm b/lib/WebGUI/Definition/Asset.pm index a12bf696c..72ff24c55 100644 --- a/lib/WebGUI/Definition/Asset.pm +++ b/lib/WebGUI/Definition/Asset.pm @@ -72,7 +72,7 @@ sub init_meta { =head2 property ( $name, %options ) -Extends WebGUI::Definition::property to copy the table attribute from the +Extends WebGUI::Definition::property to copy the tableName attribute from the meta class into the options for each property. =head3 $name @@ -84,7 +84,7 @@ meta class into the options for each property. sub property { my ($meta, $name, %options) = @_; - $options{table} //= $meta->table; + $options{tableName} //= $meta->tableName; return WebGUI::Definition::property($meta, $name, %options); } diff --git a/lib/WebGUI/Definition/Meta/Asset.pm b/lib/WebGUI/Definition/Meta/Asset.pm index 01a2bd075..b30cded92 100644 --- a/lib/WebGUI/Definition/Meta/Asset.pm +++ b/lib/WebGUI/Definition/Meta/Asset.pm @@ -55,7 +55,7 @@ sub property_meta { return 'WebGUI::Definition::Meta::Property::Asset'; } -has 'table' => ( +has 'tableName' => ( is => 'rw', ); @@ -69,7 +69,7 @@ has 'assetName' => ( #------------------------------------------------------------------- -=head2 table ( ) +=head2 tableName ( ) The table that this asset stores its properties in. diff --git a/lib/WebGUI/Definition/Meta/Property/Asset.pm b/lib/WebGUI/Definition/Meta/Property/Asset.pm index fb362542b..b3a6838df 100644 --- a/lib/WebGUI/Definition/Meta/Property/Asset.pm +++ b/lib/WebGUI/Definition/Meta/Property/Asset.pm @@ -38,7 +38,7 @@ The following methods are added. extends 'WebGUI::Definition::Meta::Property'; -has 'table' => ( +has 'tableName' => ( is => 'ro', ); @@ -52,11 +52,11 @@ has 'noFormPost' => ( #------------------------------------------------------------------- -=head2 table ( ) +=head2 tableName ( ) Previously, properties were storied in arrays of definitions, with each definition providing its own attributes like table. This Moose based implementation stores -the properties flat, so the table attribute is copied into the property so we +the properties flat, so the tableName attribute is copied into the property so we know where to store it. =cut