Fix the "close before dup" bug in clone-pack too

Same issue as git-fetch-pack.

clone-pack.c

@@ -152,9 +152,9 @@ static int clone_pack(int fd[2], int nr_match, char **match)
 	if (pid < 0)
 		die("git-clone-pack: unable to fork off git-unpack-objects");
 	if (!pid) {
-		close(fd[1]);
 		dup2(fd[0], 0);
 		close(fd[0]);
+		close(fd[1]);
 		execlp("git-unpack-objects", "git-unpack-objects",
 			quiet ? "-q" : NULL, NULL);
 		die("git-unpack-objects exec failed");