summaryrefslogtreecommitdiff
path: root/lib/StarGit.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/StarGit.pm')
-rw-r--r--lib/StarGit.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/StarGit.pm b/lib/StarGit.pm
index 72933da..6483a73 100644
--- a/lib/StarGit.pm
+++ b/lib/StarGit.pm
@@ -2,6 +2,7 @@ package StarGit;
use Dancer ':syntax';
use StarGit::Graph;
+use Cache::Memcached; # don't use it yet
our $VERSION = '0.1';
@@ -15,12 +16,17 @@ get '/graph/local/:name' => sub {
my $name = params->{'name'};
my $graph = StarGit::Graph->new( name => $name );
+
+ return send_error( "user " . $name . " doesn't exists", 404 )
+ unless $graph->exists($name);
+
$graph->neighbors( $name, 1 );
$graph->remove_leaves();
return _finalize($graph);
};
+# XXX do we already use this one ?
get '/graph/query' => sub {
my $language = params->{language};