diff --git a/Core.hs b/Core.hs
index 08e2265920..d59120d673 100644
--- a/Core.hs
+++ b/Core.hs
@@ -173,7 +173,8 @@ moveBad key = do
 	g <- Annex.gitRepo
 	let src = annexLocation g key
 	let dest = annexBadLocation g ++ takeFileName src
-	liftIO $ createDirectoryIfMissing True dest
+	liftIO $ createDirectoryIfMissing True (parentDir dest)
+	liftIO $ allowWrite (parentDir src)
 	liftIO $ renameFile src dest
 	liftIO $ removeDirectory (parentDir src)
 	return dest
diff --git a/debian/changelog b/debian/changelog
index 96acc592c9..c826fb7d6e 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -3,6 +3,7 @@ git-annex (0.18) UNRELEASED; urgency=low
   * Bugfix: `copy --to` and `move --to` forgot to stage location log changes
     after transferring the file to the remote repository.
     (Did not affect ssh remotes.)
+  * fsck: Fix bug in moving of corrupted files to .git/annex/bad/
 
  -- Joey Hess <joeyh@debian.org>  Tue, 11 Jan 2011 16:05:25 -0400