changed key to include backend name
This commit is contained in:
parent
c4959fee47
commit
b8ba60428a
5 changed files with 40 additions and 29 deletions
6
Core.hs
6
Core.hs
|
@ -50,7 +50,7 @@ gitAttributes repo = do
|
|||
attributes]
|
||||
|
||||
{- Checks if a given key is currently present in the annexLocation -}
|
||||
inAnnex :: Backend -> Key -> Annex Bool
|
||||
inAnnex backend key = do
|
||||
inAnnex :: Key -> Annex Bool
|
||||
inAnnex key = do
|
||||
g <- Annex.gitRepo
|
||||
liftIO $ doesFileExist $ annexLocation g backend key
|
||||
liftIO $ doesFileExist $ annexLocation g key
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue