From 738500c2fa8c724a2c513ef84ebcba908311671b Mon Sep 17 00:00:00 2001 From: franck cuny Date: Mon, 13 Jun 2011 17:18:21 +0200 Subject: add memcached; check if login exists else return 404 Signed-off-by: franck cuny --- lib/StarGit/Graph.pm | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'lib/StarGit') diff --git a/lib/StarGit/Graph.pm b/lib/StarGit/Graph.pm index 1b9dd0a..488d07d 100644 --- a/lib/StarGit/Graph.pm +++ b/lib/StarGit/Graph.pm @@ -19,6 +19,12 @@ has name => ( isa => 'Str', ); +sub exists { + my ($self, $name) = @_; + my $info = $self->db_profiles->find_one( { login => $name } ); + $info; +} + sub neighbors { my ($self, $name) = @_; @@ -130,6 +136,9 @@ sub _create_edge { sub _get_info_from_login { my ($self, $login) = @_; my $info = $self->db_profiles->find_one( { login => $login } ); + + return undef if (!defined $info); + my $country = $info->{country} || 'null'; my $language = $info->{language} || 'null'; return ($country, $language); -- cgit v1.2.3