diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-02-10 11:14:44 +0100 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-02-10 11:14:44 +0100 |
| commit | d131c91912fa3a094aa85b9bc924193d8fce0eea (patch) | |
| tree | f67f8421ad37a8d1f7d0ab0df4804e04e40a0097 /lib/githubexplorer/Network.pm | |
| parent | typo (diff) | |
| download | github-explorer-d131c91912fa3a094aa85b9bc924193d8fce0eea.tar.gz | |
fix
Diffstat (limited to '')
| -rw-r--r-- | lib/githubexplorer/Network.pm | 2 |
1 files changed, 2 insertions, 0 deletions
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, |