From 767efffd7c1bd2abf7477fe998ecac1f67d76774 Mon Sep 17 00:00:00 2001
From: Moritz Angermann <moritz.angermann@gmail.com>
Date: Thu, 8 Feb 2018 16:16:05 +0800
Subject: [PATCH] Cleanup directory compat

---
 Cabal/Distribution/Simple/Configure.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Cabal/Distribution/Simple/Configure.hs b/Cabal/Distribution/Simple/Configure.hs
index 61e70068ba1..fdd660e9025 100644
--- a/Cabal/Distribution/Simple/Configure.hs
+++ b/Cabal/Distribution/Simple/Configure.hs
@@ -142,10 +142,10 @@ import Distribution.Compat.Exception ( catchExit, catchIO )
 
 
 #if !MIN_VERSION_directory(1,2,5)
-import System.Directory (getDirectoryContents)
+import qualified System.Directory as Dir (getDirectoryContents)
 listDirectory :: FilePath -> IO [FilePath]
 listDirectory path =
-  (filter f) <$> (getDirectoryContents path)
+  filter f <$> Dir.getDirectoryContents path
   where f filename = filename /= "." && filename /= ".."
 #else
 import System.Directory (listDirectory)