From 2f9c5fdee389afe5c7dfce81def7ecb596df91b9 Mon Sep 17 00:00:00 2001
From: Mikhail Glushenkov <mikhail.glushenkov@gmail.com>
Date: Mon, 9 Mar 2015 22:58:42 +0100
Subject: [PATCH] -Wall police.

---
 cabal-install/Distribution/Client/Run.hs | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/cabal-install/Distribution/Client/Run.hs b/cabal-install/Distribution/Client/Run.hs
index 0926b2ed92..d3f07d9f15 100644
--- a/cabal-install/Distribution/Client/Run.hs
+++ b/cabal-install/Distribution/Client/Run.hs
@@ -1,3 +1,4 @@
+{-# LANGUAGE CPP #-}
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Distribution.Client.Run
@@ -28,7 +29,9 @@ import Distribution.Verbosity                (Verbosity)
 
 import qualified Distribution.Simple.GHCJS as GHCJS
 
+#if !MIN_VERSION_base(4,8,0)
 import Data.Functor                          ((<$>))
+#endif
 import Data.List                             (find)
 import System.Directory                      (getCurrentDirectory)
 import Distribution.Compat.Environment       (getEnvironment)
-- 
GitLab