summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 50c08d4)
raw | patch | inline | side by side (parent: 50c08d4)
author | Martyn Smith <martyn@catalyst.net.nz> | |
Fri, 17 Mar 2006 00:33:19 +0000 (13:33 +1300) | ||
committer | Martin Langhoff <martin@catalyst.net.nz> | |
Sun, 7 May 2006 22:10:48 +0000 (10:10 +1200) |
git-cvsserver.perl | patch | blob | history |
diff --git a/git-cvsserver.perl b/git-cvsserver.perl
index ffd9c66f940d6454d077e2b0082f5afd360d901e..2e9b6733729d5f95b5b3ea613376794610d05df1 100755 (executable)
--- a/git-cvsserver.perl
+++ b/git-cvsserver.perl
if ( -e $state->{CVSROOT} . "/index" )
{
+ $log->warn("file 'index' already exists in the git repository");
print "error 1 Index already exists in git repo\n";
exit;
}
my $lockfile = "$state->{CVSROOT}/refs/heads/$state->{module}.lock";
unless ( sysopen(LOCKFILE,$lockfile,O_EXCL|O_CREAT|O_WRONLY) )
{
+ $log->warn("lockfile '$lockfile' already exists, please try again");
print "error 1 Lock file '$lockfile' already exists, please try again\n";
exit;
}