diff options
Diffstat (limited to 'lib/Graph/GEXF/Role/Viz/Position.pm')
| -rw-r--r-- | lib/Graph/GEXF/Role/Viz/Position.pm | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/lib/Graph/GEXF/Role/Viz/Position.pm b/lib/Graph/GEXF/Role/Viz/Position.pm new file mode 100644 index 0000000..c9e79c3 --- /dev/null +++ b/lib/Graph/GEXF/Role/Viz/Position.pm @@ -0,0 +1,18 @@ +package Graph::GEXF::Role::Viz::Position; + +use Moose::Role; + +my $_has_position = 0; + +has [qw/x y z/] => ( + is => 'rw', + isa => 'Num', + trigger => sub { $_has_position++ }, + traits => ['Chained'], +); + +sub has_position { $_has_position } + +no Moose::Role; + +1; |
