summaryrefslogtreecommitdiff
path: root/GitRepo.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-12 20:04:36 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-12 20:04:36 -0400
commitb7858ada038084c8455cdf9d3598382308dc52b3 (patch)
tree373fec9662eb3b7c592dc28ccd301473fb3ce1a2 /GitRepo.hs
parent476f66abb99ad2baa18b699c26ac9ee7250eca76 (diff)
bugfixes
Diffstat (limited to 'GitRepo.hs')
-rw-r--r--GitRepo.hs10
1 files changed, 0 insertions, 10 deletions
diff --git a/GitRepo.hs b/GitRepo.hs
index 068b2569c..fcaae1253 100644
--- a/GitRepo.hs
+++ b/GitRepo.hs
@@ -15,8 +15,6 @@ module GitRepo (
gitRelative,
gitConfig,
gitConfigRead,
- gitAdd,
- gitRm,
gitRun,
gitAttributes
) where
@@ -128,14 +126,6 @@ gitRelative repo file = drop (length absrepo) absfile
Just f -> f
Nothing -> error $ file ++ " is not located inside git repository " ++ absrepo
-{- Stages a changed/new file in git's index. -}
-gitAdd :: GitRepo -> FilePath -> IO ()
-gitAdd repo file = gitRun repo ["add", file]
-
-{- Removes a file. -}
-gitRm :: GitRepo -> FilePath -> IO ()
-gitRm repo file = gitRun repo ["rm", file]
-
{- Constructs a git command line operating on the specified repo. -}
gitCommandLine :: GitRepo -> [String] -> [String]
gitCommandLine repo params = assertlocal repo $