From d131c91912fa3a094aa85b9bc924193d8fce0eea Mon Sep 17 00:00:00 2001 From: franck cuny Date: Wed, 10 Feb 2010 11:14:44 +0100 Subject: fix --- lib/githubexplorer/Network.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib') diff --git a/lib/githubexplorer/Network.pm b/lib/githubexplorer/Network.pm index 7e836ff..129dca9 100644 --- a/lib/githubexplorer/Network.pm +++ b/lib/githubexplorer/Network.pm @@ -7,6 +7,7 @@ use YAML::Syck; sub fetch_network { my ( $self, $repos ) = @_; + say ">> start on ".$repos->name; my $api_repos = Net::GitHub::V2::Repositories->new( owner => $repos->id_profile->login, repo => $repos->name, @@ -21,6 +22,7 @@ sub fetch_network { ->find( { login => $edge->{owner} } ); next if !$profile; + say "** create relation between ".$repo->name." and ".$profile->login; my $relation = $self->schema->resultset('Fork')->find_or_create( { profile => $profile->id, -- cgit 1.4.1