Another instance of nhc98's strange import semantics.

[ghc-base.git] / Control / Applicative.hs

diff --git a/Control/Applicative.hs b/Control/Applicative.hs
index e60182d..8aa86e1 100644 (file)
--- a/Control/Applicative.hs
+++ b/Control/Applicative.hs
@@ -36,6 +36,7 @@ module Control.Applicative (
         ) where
 
 import Prelude hiding (id,(.))
+import qualified Prelude (id)
 
 import Control.Category
 import Control.Arrow