diff --git a/lib/WebGUI/Definition/Meta/Asset.pm b/lib/WebGUI/Definition/Meta/Asset.pm
index 1627b958c..2ec6375d0 100644
--- a/lib/WebGUI/Definition/Meta/Asset.pm
+++ b/lib/WebGUI/Definition/Meta/Asset.pm
@@ -76,7 +76,7 @@ Returns an array of the names of all tables in every class used by this class.
 =cut
 
 sub get_tables {
-    my $self = shift;
+    my ($self) = @_;
     if ($self->is_immutable) {
         return @{ $self->{__immutable}{get_tables_methods} ||= [ $self->_get_tables ] };
     }