Code

GIT 0.99.9j aka 1.0rc3
[git.git] / git-archimport.perl
index e22c81628dbde8a16c0bef5f64d3e6b34fba4f26..23becb7962b3fdf3b31db7b492467fc158015de1 100755 (executable)
@@ -410,8 +410,7 @@ foreach my $ps (@psets) {
     open  HEAD, ">$git_dir/refs/heads/$ps->{branch}";
     print HEAD $commitid;
     close HEAD;
-    unlink ("$git_dir/HEAD");
-    symlink("refs/heads/$ps->{branch}","$git_dir/HEAD");
+    system('git-update-ref', 'HEAD', "$ps->{branch}");
 
     # tag accordingly
     ptag($ps->{id}, $commitid); # private tag