diff --git a/fclabels.cabal b/fclabels.cabal
--- a/fclabels.cabal
+++ b/fclabels.cabal
@@ -1,5 +1,5 @@
 Name:          fclabels
-Version:       2.0.0.2
+Version:       2.0.0.3
 Author:        Sebastiaan Visser, Erik Hesselink, Chris Eidhof, Sjoerd Visscher
                with lots of help and feedback from others.
 Synopsis:      First class accessor labels implemented as lenses.
@@ -47,9 +47,10 @@
                See "Data.Label.Base" and "Data.Label.Monadic" for more
                information.
                .
-               * /Changelog from 2.0.0.1 to 2.0.0.2/
+               * /Changelog from 2.0.0.2 to 2.0.0.3/
                .
-               >   - Fix deriving with data types with more than 24 fields.
+               >   - Support GHC 7.0. Note that there seems to be a problem with the
+               >     appicative syntax, see test cases.
 
 Maintainer:    Sebastiaan Visser <code@fvisser.nl>
 Homepage:      https://github.com/sebastiaanvisser/fclabels
diff --git a/src/Data/Label/Derive.hs b/src/Data/Label/Derive.hs
--- a/src/Data/Label/Derive.hs
+++ b/src/Data/Label/Derive.hs
@@ -49,7 +49,6 @@
 import Data.List (groupBy, sortBy, delete, nub)
 import Data.Maybe (fromMaybe)
 import Data.Ord
-import Data.String
 import Language.Haskell.TH
 import Prelude hiding ((.), id)
 
diff --git a/src/Data/Label/Mono.hs b/src/Data/Label/Mono.hs
--- a/src/Data/Label/Mono.hs
+++ b/src/Data/Label/Mono.hs
@@ -26,7 +26,7 @@
 import Control.Category
 import Control.Arrow
 import Data.Label.Point (Point, Iso (..), Total, Partial)
-import Prelude hiding ((.), id)
+import Prelude ()
 
 import qualified Data.Label.Poly as Poly
 
diff --git a/src/Data/Label/Point.hs b/src/Data/Label/Point.hs
--- a/src/Data/Label/Point.hs
+++ b/src/Data/Label/Point.hs
@@ -8,7 +8,8 @@
     TypeOperators
   , Arrows
   , FlexibleInstances
-  , MultiParamTypeClasses #-}
+  , MultiParamTypeClasses
+  , TypeSynonymInstances #-}
 
 module Data.Label.Point
 (
diff --git a/src/Data/Label/Poly.hs b/src/Data/Label/Poly.hs
--- a/src/Data/Label/Poly.hs
+++ b/src/Data/Label/Poly.hs
@@ -23,7 +23,7 @@
 
 import Control.Category
 import Control.Arrow
-import Prelude hiding ((.), id)
+import Prelude ()
 import Data.Label.Point (Point (Point), Iso(..), identity, compose)
 
 import qualified Data.Label.Point as Point