diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Graph/GEXF.pm | 4 | ||||
| -rw-r--r-- | lib/Graph/GEXF/Edge.pm | 4 |
2 files changed, 4 insertions, 4 deletions
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); |
