Remove pointless DESTROY methods

[dbsrgits/SQL-Translator.git] / lib / SQL / Translator / Schema.pm

diff --git a/lib/SQL/Translator/Schema.pm b/lib/SQL/Translator/Schema.pm
index d4caf91..3e7884b 100644 (file)
--- a/lib/SQL/Translator/Schema.pm
+++ b/lib/SQL/Translator/Schema.pm
@@ -759,12 +759,6 @@ Get the SQL::Translator instance that instantiated the parser.
 
 has translator => ( is => 'rw' );
 
-sub DESTROY {
-    my $self = shift;
-    undef $_ for values %{ $self->_tables };
-    undef $_ for values %{ $self->_views };
-}
-
 1;
 
 =pod