lib/GitHub/Collector/Role/Graph/Search.pm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

package GitHub::Collector::Role::Graph::Search;

use Moose::Role;

sub build_from_query {
    my ($self, $search) = @_;

    $search ||= $self->build_query();

    my $profiles = $self->db_profiles->find($search);

    while ( my $profile = $profiles->next ) {
       $self->neighbors( $profile->{login}, 0 );
    }

    $self->remove_leaves();
}

1;