@@ -37,4 +37,3 @@ xt/import_rep.db

 xt/import_rep_user

 xt/smart_http.db

 xt/smart_http

-xt/smart_http_work

@@ -194,8 +194,6 @@ sub startup {

             my $r = $r->under(sub {

               my $self = shift;

-              my $paths = $self->url_for->path->parts;

-              

               # Basic auth when push request

               my $service = $self->param('service') || '';

               if ($service eq 'git-receive-pack') {

@@ -1,3 +1,5 @@

 #!/bin/sh

+CUR_DIR_ABS=$(cd $(dirname $0); pwd)

+export PERL_CPANM_HOME=$CUR_DIR_ABS/setup

 perl cpanm -n -l extlib Module::CoreList

 perl -Iextlib/lib/perl5 cpanm -n -L extlib --installdeps .

@@ -9,8 +9,6 @@

   my $git = app->git;

   my $sh = app->smart_http;

-  warn $service;

-  

   # Smart HTTP

   if ($service eq 'git-upload-pack' || $service eq 'git-receive-pack') {