From ab8fa0d2056e55af829bdf843e162e97ac903f4d Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 2 Jan 2012 23:30:41 -0400 Subject: [PATCH] dead code --- Seek.hs | 5 ----- 1 file changed, 5 deletions(-) diff --git a/Seek.hs b/Seek.hs index 28c6ffc00c..251db50b82 100644 --- a/Seek.hs +++ b/Seek.hs @@ -44,11 +44,6 @@ withBackendFilesInGit a params = do files <- seekHelper LsFiles.inRepo params prepBackendPairs a files -withFilesMissing :: (String -> CommandStart) -> CommandSeek -withFilesMissing a params = prepFiltered a $ liftIO $ filterM missing params - where - missing = liftM not . doesFileExist - withFilesNotInGit :: (BackendFile -> CommandStart) -> CommandSeek withFilesNotInGit a params = do force <- Annex.getState Annex.force