mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

remove unused function

Browse source
This commit is contained in:
Joey Hess 2012-12-12 13:17:41 -04:00
parent f2ed0f9659
commit 0714b0bd03
1 changed files with 0 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Git/LsFiles.hs
View file

@ -10,7 +10,6 @@ module Git.LsFiles (
notInRepo, notInRepo,
staged, staged,
stagedNotDeleted, stagedNotDeleted,
changedUnstaged,
typeChanged, typeChanged,
typeChangedStaged, typeChangedStaged,
Conflicting(..), Conflicting(..),
@ -53,12 +52,6 @@ staged' ps l = pipeNullSplit $ prefix ++ ps ++ suffix
prefix = [Params "diff --cached --name-only -z"] prefix = [Params "diff --cached --name-only -z"]
suffix = Param "--" : map File l suffix = Param "--" : map File l
{- 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 {- Returns a list of the files in the specified locations that are staged
- for commit, and whose type has changed. -} - for commit, and whose type has changed. -}
typeChangedStaged :: [FilePath] -> Repo -> IO ([FilePath], IO Bool) typeChangedStaged :: [FilePath] -> Repo -> IO ([FilePath], IO Bool)