From aa56c7801272d606d30e42e631f3c33c85d24f7d Mon Sep 17 00:00:00 2001 From: franck cuny Date: Mon, 13 Jun 2011 18:56:59 +0200 Subject: remove dep on libuuid Signed-off-by: franck cuny --- lib/Graph/GEXF.pm | 4 ++-- lib/Graph/GEXF/Edge.pm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) (limited to 'lib') diff --git a/lib/Graph/GEXF.pm b/lib/Graph/GEXF.pm index f226b06..941bcb9 100644 --- a/lib/Graph/GEXF.pm +++ b/lib/Graph/GEXF.pm @@ -4,7 +4,7 @@ package Graph::GEXF; use Moose; -use Data::UUID::LibUUID; +#use Data::UUID::LibUUID; use Moose::Util::TypeConstraints; use Graph::GEXF::Node; @@ -124,7 +124,7 @@ sub add_node { die "Can't add node wih id $id: already exists"; } - $id = new_uuid_string() if !defined $id; +# $id = new_uuid_string() if !defined $id; my $node = Graph::GEXF::Node->new(id => $id); diff --git a/lib/Graph/GEXF/Edge.pm b/lib/Graph/GEXF/Edge.pm index a116a01..fe94d82 100644 --- a/lib/Graph/GEXF/Edge.pm +++ b/lib/Graph/GEXF/Edge.pm @@ -1,7 +1,7 @@ package Graph::GEXF::Edge; use Moose; -use Data::UUID::LibUUID; +#use Data::UUID::LibUUID; with 'Graph::GEXF::Role::Viz::Size' => { as => 'thickness' }, @@ -11,7 +11,7 @@ has id => ( is => 'ro', isa => 'Str', required => 1, - default => sub { new_uuid_string() } +# default => sub { new_uuid_string() } ); has source => (is => 'ro', isa => 'Str', required => 1); -- cgit v1.2.3