remove copy/paste variable names.
This commit is contained in:
parent
d7b0d93ad8
commit
4d3d031d78
1 changed files with 3 additions and 3 deletions
|
|
@ -77,14 +77,14 @@ Returns an array of the names of all tables in every class used by this class.
|
|||
|
||||
sub get_tables {
|
||||
my $self = shift;
|
||||
my @properties = ();
|
||||
my @tables = ();
|
||||
my %seen = ();
|
||||
push @properties,
|
||||
push @tables,
|
||||
grep { ! $seen{$_}++ }
|
||||
map { $_->tableName }
|
||||
$self->get_all_class_metas
|
||||
;
|
||||
return @properties;
|
||||
return @tables;
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue