diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-02-10 11:14:27 +0100 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-02-10 11:14:27 +0100 |
| commit | 2e7274ab72118070ab6bb7606f2e369e75f5ab37 (patch) | |
| tree | ae27b7f9362f609db28f82eb673f5c3ab9072633 | |
| parent | Merge branch 'master' of git@lj:github-explorer (diff) | |
| parent | fix (diff) | |
| download | github-explorer-2e7274ab72118070ab6bb7606f2e369e75f5ab37.tar.gz | |
Merge branch 'master' of git@lj:github-explorer
* 'master' of git@lj:github-explorer: fix
| -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, |