Merge branch 'js/cvs'

* js/cvs: cvsserver: imitate git-update-ref when committing
git-mirror · Jul 28, 2006 · 922819c · 922819c
2 parents 205be1e + cadbcf2
commit 922819c
Showing 1 changed file with 4 additions and 4 deletions.
diff --git a/git-cvsserver.perl b/git-cvsserver.perl
@@ -1142,9 +1142,7 @@ sub req_ci
         exit;
     }
 
-    open FILE, ">", "$ENV{GIT_DIR}refs/heads/$state->{module}";
-    print FILE $commithash;
-    close FILE;
+    print LOCKFILE $commithash;
 
     $updater->update();
 
@@ -1171,7 +1169,9 @@ sub req_ci
     }
 
     close LOCKFILE;
-    unlink($lockfile);
+    my $reffile = "$ENV{GIT_DIR}refs/heads/$state->{module}";
+    unlink($reffile);
+    rename($lockfile, $reffile);
     chdir "/";
 
     print "ok\n";