add Graph::GEXF while it's not on CPAN

Signed-off-by: franck cuny <franck@lumberjaph.net>

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;