diff --git a/Annex/AdjustedBranch.hs b/Annex/AdjustedBranch.hs
index 841d1f2756..1f1daecbc9 100644
--- a/Annex/AdjustedBranch.hs
+++ b/Annex/AdjustedBranch.hs
@@ -57,7 +57,6 @@ import Annex.Tmp
 import Annex.GitOverlay
 import Utility.Tmp.Dir
 import Utility.CopyFile
-import Utility.Directory
 import qualified Database.Keys
 import Config
 
diff --git a/Utility/Directory.hs b/Utility/Directory.hs
index 3c6c1edd0e..8b5b88b746 100644
--- a/Utility/Directory.hs
+++ b/Utility/Directory.hs
@@ -14,7 +14,6 @@ module Utility.Directory (
 	module Utility.SystemDirectory
 ) where
 
-import System.IO.Error
 import Control.Monad
 import System.FilePath
 import System.PosixCompat.Files