1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
package # hide from pause
SQL::Translator::Schema::Graph::HyperEdge;
use strict;
use warnings;
use base qw(SQL::Translator::Schema::Graph::Edge);
use Class::MakeMethods::Template::Hash (
'array_of_objects -class SQL::Translator::Schema::Field' => [ qw( thisviafield thatviafield thisfield thatfield) ], #FIXME
'array_of_objects -class SQL::Translator::Schema::Graph::Node' => [ qw( thisnode thatnode ) ],
object => [ 'vianode' => {class => 'SQL::Translator::Schema::Graph::Node'} ],
);
1;
|
