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

Change get_property_list from an attribute to a method in Definition::Meta::Class.

Browse source
This commit is contained in:
Colin Kuskie 2009-12-10 15:54:49 -08:00
parent c2fca8e178
commit 849e8d4037
1 changed files with 9 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Definition/Meta/Class.pm
View file

@ -52,10 +52,7 @@ Returns the name of all properties, in the order they were created in the Defini
=cut =cut
sub get_property_list {
has 'get_property_list' => (
is => 'ro',
default => sub {
my $self = shift; my $self = shift;
my @properties = my @properties =
map { $_->name } map { $_->name }
@ -63,8 +60,7 @@ has 'get_property_list' => (
grep { $_->meta->isa('WebGUI::Definition::Meta::Property') } grep { $_->meta->isa('WebGUI::Definition::Meta::Property') }
$self->meta->get_all_attributes; $self->meta->get_all_attributes;
return \@properties; return \@properties;
}, }
);
#------------------------------------------------------------------- #-------------------------------------------------------------------