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

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