oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

change table to tableName in definition

Browse source
This commit is contained in:
Graham Knop 2009-12-07 12:22:33 -06:00
parent bb2667206d
commit 2c7eb7478e
3 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Definition/Asset.pm
View file

@ -72,7 +72,7 @@ sub init_meta {
=head2 property ( $name, %options ) =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. meta class into the options for each property.
=head3 $name =head3 $name
@ -84,7 +84,7 @@ meta class into the options for each property.
sub property { sub property {
my ($meta, $name, %options) = @_; my ($meta, $name, %options) = @_;
$options{table} //= $meta->table; $options{tableName} //= $meta->tableName;
return WebGUI::Definition::property($meta, $name, %options); return WebGUI::Definition::property($meta, $name, %options);
} }

4
lib/WebGUI/Definition/Meta/Asset.pm
View file

@ -55,7 +55,7 @@ sub property_meta {
return 'WebGUI::Definition::Meta::Property::Asset'; return 'WebGUI::Definition::Meta::Property::Asset';
} }
has 'table' => ( has 'tableName' => (
is => 'rw', is => 'rw',
); );
@ -69,7 +69,7 @@ has 'assetName' => (
#------------------------------------------------------------------- #-------------------------------------------------------------------
=head2 table ( ) =head2 tableName ( )
The table that this asset stores its properties in. The table that this asset stores its properties in.

6
lib/WebGUI/Definition/Meta/Property/Asset.pm
View file

@ -38,7 +38,7 @@ The following methods are added.
extends 'WebGUI::Definition::Meta::Property'; extends 'WebGUI::Definition::Meta::Property';
has 'table' => ( has 'tableName' => (
is => 'ro', is => 'ro',
); );
@ -52,11 +52,11 @@ has 'noFormPost' => (
#------------------------------------------------------------------- #-------------------------------------------------------------------
=head2 table ( ) =head2 tableName ( )
Previously, properties were storied in arrays of definitions, with each definition Previously, properties were storied in arrays of definitions, with each definition
providing its own attributes like table. This Moose based implementation stores 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. know where to store it.
=cut =cut