From 4d3d031d7845e8bcd29951a72210f230b7f07cd7 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Wed, 3 Mar 2010 15:39:05 -0800
Subject: [PATCH] remove copy/paste variable names.

---
 lib/WebGUI/Definition/Meta/Asset.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI/Definition/Meta/Asset.pm b/lib/WebGUI/Definition/Meta/Asset.pm
index 41678c449..ee2dbcf0b 100644
--- a/lib/WebGUI/Definition/Meta/Asset.pm
+++ b/lib/WebGUI/Definition/Meta/Asset.pm
@@ -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;
 }
 
 #-------------------------------------------------------------------