diff options
-rw-r--r-- | Backend.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Backend.hs b/Backend.hs index 5ddd3aac6..eb4a948c4 100644 --- a/Backend.hs +++ b/Backend.hs @@ -75,6 +75,7 @@ dropFile backends repo file = do Just b -> do key <- lookupKey b repo file (removeKey b) key + removeFile $ backendFile b repo file return $ Just key {- Looks up the key a backend uses for an already annexed file. -} |