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

   1 package SQL::Translator::Schema::Graph::Node;
   2
   3 use strict;
   4
   5 use Class::MakeMethods::Template::Hash (
   6   new => [ 'new' ],
   7   'array_of_objects -class SQL::Translator::Schema::Graph::Edge' => [ qw( edges ) ],
   8   'array_of_objects -class SQL::Translator::Schema::Graph::CompoundEdge' => [ qw( compoundedges ) ],
   9   'array_of_objects -class SQL::Translator::Schema::Graph::HyperEdge' => [ qw( hyperedges ) ],
  10   'hash' => [ qw( many via has ) ],
  11   scalar => [ qw( base name order primary_key primary_key_accessor table ) ],
  12   number => [ qw( order ) ],
  13 );
  14
  15 1;