From a96b8b74311a52cc04e3d5e0d1d67628aa996693 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 28 Feb 2017 12:49:17 -0400
Subject: squelch a couple of warnings about moveAnnex return code

---
 Upgrade/V1.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Upgrade')

diff --git a/Upgrade/V1.hs b/Upgrade/V1.hs
index d0f9e51d3..01741bbeb 100644
--- a/Upgrade/V1.hs
+++ b/Upgrade/V1.hs
@@ -74,7 +74,7 @@ moveContent = do
 		let d = parentDir f
 		liftIO $ allowWrite d
 		liftIO $ allowWrite f
-		moveAnnex k f
+		_ <- moveAnnex k f
 		liftIO $ removeDirectory d
 
 updateSymlinks :: Annex ()
-- 
cgit v1.2.3