missed a file
This commit is contained in:
parent
200bc6fdb8
commit
dc5e8853f3
1 changed files with 1 additions and 0 deletions
|
@ -75,6 +75,7 @@ dropFile backends repo file = do
|
||||||
Just b -> do
|
Just b -> do
|
||||||
key <- lookupKey b repo file
|
key <- lookupKey b repo file
|
||||||
(removeKey b) key
|
(removeKey b) key
|
||||||
|
removeFile $ backendFile b repo file
|
||||||
return $ Just key
|
return $ Just key
|
||||||
|
|
||||||
{- Looks up the key a backend uses for an already annexed file. -}
|
{- Looks up the key a backend uses for an already annexed file. -}
|
||||||
|
|
Loading…
Reference in a new issue