supporting DOS and fake Unix...

I was very, very, tempted to say "sorry; not supported".  Sadly,
prudence won over juvenile glee...

PS: DOS == dominant operating system

doc/mkdoc

@@ -7,7 +7,7 @@ my $MKD = "./Markdown.pl";
 use 5.10.0;
 use strict;
 use warnings;
-use lib '../src/Gitolite/Test';
+use lib '../src/lib/Gitolite/Test';
 use Tsh;
 
 $ENV{TSH_ERREXIT} = 1;

install

@@ -10,7 +10,8 @@ use FindBin;
 
 # meant to be run from the root of the gitolite tree, one level above 'src'
 BEGIN { $ENV{GL_BINDIR} = $FindBin::RealBin . "/src"; }
-use lib $ENV{GL_BINDIR};
+BEGIN { $ENV{GL_LIBDIR} = "$ENV{GL_BINDIR}/lib"; }
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Common;
 
 =for usage

src/commands/access

@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

src/commands/creator

@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

src/commands/git-config

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 use Getopt::Long;
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

src/commands/help

@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 

src/commands/info

@@ -4,7 +4,7 @@ use warnings;
 
 use Getopt::Long;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

src/commands/mirror

@@ -8,7 +8,7 @@ BEGIN {
     delete $ENV{GL_TID};
 }
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

src/commands/perms

@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

src/commands/print-default-rc

@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 
 print glrc('default-text');

src/commands/writable

@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Easy;
 
 =for usage

src/gitolite

@@ -36,7 +36,8 @@ written.
 use FindBin;
 
 BEGIN { $ENV{GL_BINDIR} = $FindBin::RealBin; }
-use lib $ENV{GL_BINDIR};
+BEGIN { $ENV{GL_LIBDIR} = "$ENV{GL_BINDIR}/lib"; }
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 

src/gitolite-shell

@@ -6,7 +6,8 @@
 use FindBin;
 
 BEGIN { $ENV{GL_BINDIR} = $FindBin::RealBin; }
-use lib $ENV{GL_BINDIR};
+BEGIN { $ENV{GL_LIBDIR} = "$ENV{GL_BINDIR}/lib"; }
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

src/lib/Gitolite/Hooks/PostUpdate.pm

@@ -55,10 +55,7 @@ __DATA__
 use strict;
 use warnings;
 
-BEGIN {
-    die "GL_BINDIR not set; aborting\n" unless $ENV{GL_BINDIR};
-}
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Hooks::PostUpdate;
 
 # gitolite post-update hook (only for the admin repo)

src/lib/Gitolite/Hooks/Update.pm

@@ -152,7 +152,7 @@ __DATA__
 use strict;
 use warnings;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Hooks::Update;
 
 # gitolite update hook

src/lib/Gitolite/Rc.pm

@@ -29,12 +29,14 @@ our %rc;
 
 # ----------------------------------------------------------------------
 
-# variables that could be overridden by the rc file
+# pre-populate some important rc keys
 # ----------------------------------------------------------------------
 
 $rc{GL_BINDIR}    = $ENV{GL_BINDIR};
-$rc{GL_REPO_BASE} = "$ENV{HOME}/repositories";
+$rc{GL_LIBDIR}    = $ENV{GL_LIBDIR};
 
+# these keys could be overridden by the rc file later
+$rc{GL_REPO_BASE} = "$ENV{HOME}/repositories";
 $rc{GL_ADMIN_BASE} = "$ENV{HOME}/.gitolite";
 $rc{LOG_TEMPLATE}  = "$ENV{HOME}/.gitolite/logs/gitolite-%y-%m.log";
 

src/triggers/post-compile/ssh-authkeys

@@ -4,7 +4,7 @@ use warnings;
 
 use File::Temp qw(tempfile);
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 

src/triggers/post-compile/update-git-configs

@@ -5,7 +5,7 @@
 
 use FindBin;
 
-use lib $ENV{GL_BINDIR};
+use lib $ENV{GL_LIBDIR};
 use Gitolite::Rc;
 use Gitolite::Common;
 use Gitolite::Conf::Load;

t/0-me-first.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # initial smoke tests

t/access.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # test 'gitolite access'

t/all-yall.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # could anything be clearer than "all y'all"?

t/basic.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # some more basic tests

t/branch-perms.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # branch permissions test

t/daemon-gitweb-via-perms.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # basic tests

t/deleg-1.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # delegation tests -- part 1

t/deleg-2.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # delegation tests -- part 2

t/deny-create.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # deny-create, the RW.*C flag

t/deny-rules-2.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # more on deny-rules

t/deny-rules.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # deny rules

t/easy.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Easy;
 use Gitolite::Test;
 # put this after ::Easy because it chdirs away from where you were and the

t/git-config.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # git config settings

t/hostname.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # %HOSTNAME tests

t/include-subconf.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # include and subconf

t/info.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # the info command

t/invalid-refnames-filenames.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # invalid refnames

t/listers.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # the various list-* commands

t/merge-check.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # merge check -- the M flag

t/mirror-test

@@ -10,7 +10,7 @@ use warnings;
 $ENV{TSH_ERREXIT} = 1;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 use Cwd;
 my $workdir = getcwd();

t/partial-copy.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # test script for partial copy feature

t/perm-roles.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # permissions using role names

t/perms-groups.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # assigning roles to groups instead of users

t/personal-branches.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # personal branches

t/reset

@@ -7,7 +7,7 @@ BEGIN {
 }
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 use Cwd;

t/rule-seq.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # rule sequence

t/sequence.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # uhh, seems to be another rule sequence test

t/ssh-authkeys.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # testing the (separate) authkeys handler

t/ssh-basic.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Common;
 use Gitolite::Test;
 

t/vrefs-1.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # VREFs - part 1

t/vrefs-2.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # VREFs - part 2

t/wild-1.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # wild repos - part 1

t/wild-2.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 # wild repos - part 2

t/writable.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 use Cwd;
 my $workdir = getcwd();

t/z-end.t

@@ -3,7 +3,7 @@ use strict;
 use warnings;
 
 # this is hardcoded; change it if needed
-use lib "src";
+use lib "src/lib";
 use Gitolite::Test;
 
 try "plan 1; cd $ENV{PWD}; git status -s -uno; !/./ or die" or die "dirty tree";