lib/SQL/Translator/Schema/Graph/CompoundEdge.pm

   1 package SQL::Translator::Schema::Graph::CompoundEdge;
   2
   3 use vars qw[ $VERSION ];
   4 $VERSION = '1.60';
   5
   6 use strict;
   7 use base qw(SQL::Translator::Schema::Graph::Edge);
   8 use Class::MakeMethods::Template::Hash (
   9     new    => ['new'],
  10     object => [ 'via' => { class => 'SQL::Translator::Schema::Graph::Node' }, ],
  11     'array_of_objects -class SQL::Translator::Schema::Graph::Edge' =>
  12       [qw( edges )],
  13 );
  14
  15 1;