chiark / gitweb /
dgit-repos-server: fixes from testing
authorIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 22 Jan 2014 18:29:09 +0000 (18:29 +0000)
committerIan Jackson <ijackson@chiark.greenend.org.uk>
Wed, 5 Mar 2014 18:29:04 +0000 (18:29 +0000)
dgit-repos-server
tests/drs-git-ext

index 2a0bf40..7c48b2f 100755 (executable)
@@ -105,7 +105,7 @@ sub acquirelock ($$) {
     my $fh;
     for (;;) {
        close $fh if $fh;
-       $fh = new IO::File ">", $lock or die "open $lock: $!";
+       $fh = new IO::File $lock, ">" or die "open $lock: $!";
        my $ok = flock $fh, $must ? LOCK_EX : (LOCK_EX|LOCK_NB);
        if (!$ok) {
            return undef unless $must;
index f783705..27b2ea3 100755 (executable)
@@ -9,6 +9,6 @@ export SSH_ORIGINAL_COMMAND="$*"
 ${DGIT_REPOS_SERVER_TEST-dgit-repos-server} \
        $tmp/suites \
        $tmp/dd.gpg,a:$tmp/dm.gpg,m$tmp/dm.txt \
-       $troot/git \
+       $tmp/git \
        --ssh
 : '))))))))))))))))))))))))))))))))))))))))'