From: Mark Addison Date: Mon, 6 Oct 2003 13:29:45 +0000 (+0000) Subject: Removed some unneeded, commented out code. X-Git-Tag: v0.04~125 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=182bc70c9eab71513730f9c4bb1f8e5ca57aefe2;p=dbsrgits%2FSQL-Translator.git Removed some unneeded, commented out code. --- diff --git a/lib/SQL/Translator/Parser/XML/XMI/Rational.pm b/lib/SQL/Translator/Parser/XML/XMI/Rational.pm index c7397ac..42bdd34 100644 --- a/lib/SQL/Translator/Parser/XML/XMI/Rational.pm +++ b/lib/SQL/Translator/Parser/XML/XMI/Rational.pm @@ -1,7 +1,7 @@ package SQL::Translator::Parser::XML::XMI::Rational; # ------------------------------------------------------------------- -# $Id: Rational.pm,v 1.3 2003-10-02 01:40:06 grommit Exp $ +# $Id: Rational.pm,v 1.4 2003-10-06 13:29:45 grommit Exp $ # ------------------------------------------------------------------- # Copyright (C) 2003 Mark Addison , # @@ -128,11 +128,6 @@ sub _add_fkey_refs { # Find the association ends my ($end) = grep { $_->{name} eq $op->{name} } @{$class->{associationEnds}}; - #my $end; - #foreach $end ( @{$class->{associationEnds}} ) { - # warn "END: $end->{name} $op->{name}\n"; - # last if $end->{name} eq $op->{name}; - #} return unless $end; # Find the fkey op my ($refop) = grep { $_->{name} eq $end->{otherEnd}{name} }