install/test made easy (WARNING: read below)

(1) testing is very easy, just run this from a clone

        t/g3-clean-install-setup-test

    BUT BE WARNED THIS IS DESTRUCTIVE; details in t/WARNING

(2) install is equally simple; see 'INSTALL' in the main directory

1 files changed, 5 insertions, 2 deletions

diff --git a/t/glt b/t/glt
index b5704f5..45e7b19 100755
--- a/t/glt
+++ b/t/glt
@@ -2,6 +2,9 @@
 use strict;
 use warnings;
 
+use FindBin;
+BEGIN { $ENV{GL_BINDIR} = $FindBin::RealBin; }
+
 print STDERR "TRACE: glt(", join( ")(", @ARGV ), ")\n";
 
 my $cmd  = shift or die "need command";
@@ -10,9 +13,9 @@ my $rc;
 
 $ENV{G3T_USER} = $user;
 if ( $cmd eq 'push' ) {
-    $rc = system( "git", $cmd, "--receive-pack=$ENV{HOME}/bin/gitolite-receive-pack", @ARGV );
+    $rc = system( "git", $cmd, "--receive-pack=$ENV{GL_BINDIR}/gitolite-receive-pack", @ARGV );
 } else {
-    $rc = system( "git", $cmd, "--upload-pack=$ENV{HOME}/bin/gitolite-upload-pack", @ARGV );
+    $rc = system( "git", $cmd, "--upload-pack=$ENV{GL_BINDIR}/gitolite-upload-pack", @ARGV );
 }
 
 if ( $? == -1 ) {