X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FGitalist.pm;h=89b4e8a746a68fbd70c8332c73eb6f2055e1ed48;hb=refs%2Ftags%2F0.004002;hp=949c5a67b0e4f662c84d73d52096f2d33802f353;hpb=e33993c9be8b249ecb9f1570bb9057d4c28b3db8;p=catagits%2FGitalist.git

diff --git a/lib/Gitalist.pm b/lib/Gitalist.pm
index 949c5a6..89b4e8a 100644
--- a/lib/Gitalist.pm
+++ b/lib/Gitalist.pm
@@ -2,6 +2,7 @@ package Gitalist;
 use Moose;
 BEGIN { require 5.008006; }
 use Catalyst::Runtime 5.90006;
+use Gitalist::Git::Util;
 use namespace::autoclean;
 
 extends 'Catalyst';
@@ -14,7 +15,7 @@ use Catalyst qw/
                 SubRequest
 /;
 
-our $VERSION = '0.003006';
+our $VERSION = '0.004002';
 $VERSION = eval $VERSION;
 
 __PACKAGE__->config(
@@ -33,7 +34,7 @@ after prepare_path => sub {
     if ($ctx->req->param('a')) {
         $ctx->req->uri->path("/legacy$path");
     }
-    
+
     if($path =~ s/[.]json$// && $ctx->req->content_type eq 'application/json') {
         $ctx->req->uri->path($path);
     }
@@ -51,9 +52,15 @@ sub uri_with {
   my $uri = $self->request->uri_with(@args);
   # Wow this awful.
   $uri =~ s[/fragment\b][];
-  return $uri;  
+  return $uri;
 }
 
+after setup_finalize => sub {
+    # At app startup, ensure we can find a git binary, rather than
+    # lazily breaking later at request time.
+    Gitalist::Git::Util->new->_git; # FIXME - should not be a private method
+};
+
 1;
 
 __END__