Bugfix: copy --to --fast never really copied, fixed.

Command/Move.hs

@@ -89,8 +89,10 @@ toPerform dest move key = do
 	-- and an explicit check is not done, when copying. When moving,
 	-- it has to be done, to avoid inaverdent data loss.
 	fast <- Annex.getState Annex.fast
-	isthere <- if fast && not move
-		then return $ Right True
+	isthere <- if fast && not move && not (Remote.hasKeyCheap dest)
+		then do
+			(remotes, _) <- Remote.keyPossibilities key
+			return $ Right $ dest `elem` remotes
 		else Remote.hasKey dest key
 	case isthere of
 		Left err -> do

debian/changelog

@@ -8,6 +8,7 @@ git-annex (0.20110329) UNRELEASED; urgency=low
     have proper permissions.
   * Added a special type of remote called a directory remote, which
     simply stores files in an arbitrary local directory.
+  * Bugfix: copy --to --fast never really copied, fixed.
 
  -- Joey Hess <joeyh@debian.org>  Sat, 26 Mar 2011 14:36:16 -0400