key conversion back from file bugfixes

1 files changed, 2 insertions, 4 deletions

diff --git a/Annex.hs b/Annex.hs
index 7cee3c4cb..936e62502 100644
--- a/Annex.hs
+++ b/Annex.hs
@@ -87,10 +87,8 @@ annexFile state file = inBackend file err $ do
 {- Inverse of annexFile. -}
 unannexFile :: State -> FilePath -> IO ()
 unannexFile state file = notinBackend file err $ \(key, backend) -> do
-	dropped <- dropFile state backend key
-	if (not dropped)
-		then error $ "backend refused to drop " ++ file
-		else cleanup key backend
+	dropFile state backend key
+	cleanup key backend
 	where
 		err = error $ "not annexed " ++ file
 		cleanup key backend = do