t/reset

   1 #!/usr/bin/perl
   2 use strict;
   3 use warnings;
   4
   5 BEGIN {
   6     unlink "$ENV{HOME}/.ssh/authorized_keys";
   7 }
   8
   9 # this is hardcoded; change it if needed
  10 use lib "src/lib";
  11 use Gitolite::Test;
  12
  13 use Cwd;
  14 my $workdir = getcwd();
  15
  16 confreset;confadd '
  17 repo foo/..*
  18     C   =   u1 u2 u3
  19     RW+ =   CREATOR
  20     RW  =   WRITERS
  21     R   =   READERS
  22 ';
  23
  24 try "ADMIN_PUSH set1; !/FATAL/" or die text();
  25
  26 try "
  27     mkdir -p keydir
  28     cp \$HOME/.ssh/u*.pub keydir
  29     cp \$HOME/.ssh/admin.pub keydir
  30     git add keydir
  31     git commit -m 6k
  32     glt push admin origin
  33 ";