reap in onLocal

Each onLocal call involves a new Annex state, so needs to clean up after it.

Remote/Git.hs

@@ -157,7 +157,9 @@ onLocal r a = do
 		-- No need to update the branch; its data is not used
 		-- for anything onLocal is used to do.
 		Annex.Branch.disableUpdate
-		a
+		ret <- a
+		liftIO $ Git.reap
+		return ret
 
 keyUrl :: Git.Repo -> Key -> String
 keyUrl r key = Git.repoLocation r ++ "/" ++ annexLocation key

debian/changelog

@@ -1,6 +1,8 @@
 git-annex (3.20111026) UNRELEASED; urgency=low
 
   * Sped up some operations on remotes that are on the same host.
+  * copy --to: Fixed leak when ran on many files and a remote on the same
+    host.
 
  -- Joey Hess <joeyh@debian.org>  Thu, 27 Oct 2011 13:58:53 -0400
 

doc/bugs/fails_to_handle_lot_of_files.mdwn

@@ -439,3 +439,7 @@ Please note the "_n TIMES_" comments. It's how often I got the same error messag
     4455
     % find source -type f | wc -l
     13554
+
+> Fixed unreaped process leak.
+> (This has nothing to do with NTFS). Ran test with 10k files
+> [[done]] --[[Joey]]