summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfranck cuny <franck@lumberjaph.net>2011-06-19 13:06:23 +0200
committerfranck cuny <franck@lumberjaph.net>2011-06-19 13:06:23 +0200
commita5e59249ecdb4d7ca91c092a4cdf9b5068ac2f38 (patch)
treeb7a97ce5d0adb1c47078bd9d27b5daddfd743735
parentusername and website are now links (diff)
downloadstargit-a5e59249ecdb4d7ca91c092a4cdf9b5068ac2f38.tar.gz
create a connection for each request
Signed-off-by: franck cuny <franck@lumberjaph.net>
Diffstat (limited to '')
-rw-r--r--lib/StarGit.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/StarGit.pm b/lib/StarGit.pm
index dfb8051..7bf3012 100644
--- a/lib/StarGit.pm
+++ b/lib/StarGit.pm
@@ -9,10 +9,6 @@ our $VERSION = '0.1';
set serializer => 'JSON';
-my $redis_conf = setting('redis');
-my $redis = Redis->new( server => $redis_conf->{server} );
-$redis->auth( $redis_conf->{auth} ) if $redis_conf->{auth};
-
get '/' => sub {
template 'index';
};
@@ -28,11 +24,15 @@ get '/api' => sub {
get '/graph/local/:name' => sub {
my $name = params->{'name'};
+ my $redis_conf = setting('redis');
+ my $redis = Redis->new( server => $redis_conf->{server} );
+ $redis->auth( $redis_conf->{auth} ) if $redis_conf->{auth};
+
if (my $cached_graph = $redis->get($name)){
debug("cache hit for $name");
return $cached_graph;
}
-
+
my $graph =
StarGit::Graph->new( name => $name, mongodb_auth => setting('mongodb') );