1 files changed, 0 insertions, 29 deletions
diff --git a/Command/FsckFile.hs b/Command/FsckFile.hs
deleted file mode 100644
index e7c3d4915..000000000
--- a/Command/FsckFile.hs
+++ /dev/null
@@ -1,29 +0,0 @@
-{- git-annex command
- -
- - Copyright 2010 Joey Hess <joey@kitenet.net>
- -
- - Licensed under the GNU GPL version 3 or higher.
- -}
-
-module Command.FsckFile where
-
-import Command
-import qualified Backend
-import Types
-import Messages
-
-seek :: [SubCmdSeek]
-seek = [withFilesInGit start]
-
-{- Checks a file's backend data for problems. -}
-start :: SubCmdStartString
-start file = isAnnexed file $ \(key, backend) -> do
-	showStart "fsck" file
-	return $ Just $ perform key backend
-
-perform :: Key -> Backend -> SubCmdPerform
-perform key backend = do
-	success <- Backend.fsckKey backend key
-	if success
-		then return $ Just $ return True
-		else return Nothing