From 1a2cc67ac8789aec37ed33faad5bee056404f7dc Mon Sep 17 00:00:00 2001
From: Petr Baudis <pasky@ucw.cz>
Date: Wed, 4 Nov 2009 10:05:32 +0100
Subject: [PATCH] taskd clone: Pass project name without trailing .git

---
 Girocco/Project.pm | 2 +-
 taskd/taskd.pl     | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/Girocco/Project.pm b/Girocco/Project.pm
index 6017fc1..5a27256 100644
--- a/Girocco/Project.pm
+++ b/Girocco/Project.pm
@@ -419,7 +419,7 @@ sub clone {
 
 	use IO::Socket;
 	my $sock = IO::Socket::UNIX->new($Girocco::Config::chroot.'/etc/taskd.socket') or die "cannot connect to taskd.socket: $!";
-	$sock->print("clone ".$self->{name}.".git\n");
+	$sock->print("clone ".$self->{name}."\n");
 	# Just ignore reply, we are going to succeed anyway and the I/O
 	# would apparently get quite hairy.
 	$sock->flush();
diff --git a/taskd/taskd.pl b/taskd/taskd.pl
index 0893612..5816b60 100755
--- a/taskd/taskd.pl
+++ b/taskd/taskd.pl
@@ -80,10 +80,10 @@ sub clone {
 	my ($name) = @_;
 	print "1\n";
 	print STDERR "cloning $name\n";
-	open STDOUT, ">".$Girocco::Config::reporoot."/".$name."/.clonelog" or die "cannot open clonelog: $!";
+	open STDOUT, ">".$Girocco::Config::reporoot."/".$name.".git/.clonelog" or die "cannot open clonelog: $!";
 	open STDERR, ">&STDOUT";
 	open STDIN, "</dev/null";
-	exec $Girocco::Config::basedir.'/taskd/clone.sh', $name or die "exec failed: $!";
+	exec $Girocco::Config::basedir.'/taskd/clone.sh', "$name.git" or die "exec failed: $!";
 }
 
 while (1) {
-- 
2.11.4.GIT