diff options
author | Joey Hess <joey@kitenet.net> | 2011-03-03 17:35:44 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2011-03-03 17:35:44 -0400 |
commit | b27b0d5cd463afcce8a95730a49288edd89eb8b8 (patch) | |
tree | 73a85c0e7a1f257c260d2ecdbaae30df260148f2 /GitRepo.hs | |
parent | e49e6a403b16cd12594239e18fa708aab61243a9 (diff) |
remove unused code
Diffstat (limited to 'GitRepo.hs')
-rw-r--r-- | GitRepo.hs | 5 |
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 |