From: Mark Addison <grommit@users.sourceforge.net>
Date: Wed, 25 May 2005 12:38:58 +0000 (+0000)
Subject: Apllied Chris Hilton patch to remove subroutine redefinition
X-Git-Tag: v0.11008~558
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4bb8137f9ee8a916d41bcbe6becb57bf6b698744;p=dbsrgits%2FSQL-Translator.git

Apllied Chris Hilton patch to remove subroutine redefinition
---

diff --git a/lib/SQL/Translator/Schema/Graph.pm b/lib/SQL/Translator/Schema/Graph.pm
index 3f41edd..d13c56b 100644
--- a/lib/SQL/Translator/Schema/Graph.pm
+++ b/lib/SQL/Translator/Schema/Graph.pm
@@ -24,7 +24,7 @@ use Class::MakeMethods::Template::Hash (
   object => [
 			 'translator' => {class => 'SQL::Translator'},
 			],
-  'hash' => [ qw( node translator) ],
+  'hash' => [ qw( node ) ],
   'number --counter' => [ qw( order ) ],
 );
 
@@ -252,16 +252,4 @@ sub init {
 
 }
 
-=head2 translator
-
-get the SQL::Translator instance that instatiated me
-
-=cut
-
-sub translator {
-    my $self = shift;
-    $self->{'translator'} = shift if @_;
-    return $self->{'translator'};
-}
-
 1;