diff --git a/Git/LsFiles.hs b/Git/LsFiles.hs index 45e105a3b8..45c830cd6c 100644 --- a/Git/LsFiles.hs +++ b/Git/LsFiles.hs @@ -69,12 +69,6 @@ stagedDetails l repo = do where (metadata, file) = separate (== '\t') s -{- Returns a list of files that have unstaged changes. -} -changedUnstaged :: [FilePath] -> Repo -> IO ([FilePath], IO Bool) -changedUnstaged l = pipeNullSplit params - where - params = Params "diff --name-only -z --" : map File l - {- Returns a list of the files in the specified locations that are staged - for commit, and whose type has changed. -} typeChangedStaged :: [FilePath] -> Repo -> IO ([FilePath], IO Bool)