summaryrefslogtreecommitdiff
path: root/GitRepo.hs
diff options
context:
space:
mode:
Diffstat (limited to 'GitRepo.hs')
-rw-r--r--GitRepo.hs5
1 files changed, 0 insertions, 5 deletions
diff --git a/GitRepo.hs b/GitRepo.hs
index 92539eb82..8e3f14ee5 100644
--- a/GitRepo.hs
+++ b/GitRepo.hs
@@ -17,7 +17,6 @@ module GitRepo (
repoIsUrl,
repoIsSsh,
repoIsLocalBare,
- repoIsLocalFull,
repoDescribe,
repoLocation,
workTree,
@@ -170,10 +169,6 @@ repoIsLocalBare :: Repo -> Bool
repoIsLocalBare r@(Repo { location = Dir _ }) = configAvail r && configBare r
repoIsLocalBare _ = False
-repoIsLocalFull :: Repo -> Bool
-repoIsLocalFull r@(Repo { location = Dir _ }) = configAvail r && not (configBare r)
-repoIsLocalFull _ = False
-
assertLocal :: Repo -> a -> a
assertLocal repo action =
if not $ repoIsUrl repo