diff --git a/Data/CaseInsensitive/Internal.hs b/Data/CaseInsensitive/Internal.hs
--- a/Data/CaseInsensitive/Internal.hs
+++ b/Data/CaseInsensitive/Internal.hs
@@ -37,6 +37,7 @@
 import Data.Monoid   ( Monoid, mempty, mappend )
 import Data.Ord      ( Ord, compare )
 import Data.String   ( IsString, fromString )
+import Data.Data     ( Data )
 import Data.Typeable ( Typeable )
 import Data.Word     ( Word8 )
 import Prelude       ( String, (.), fmap, (&&), (+), (<=), (>=), otherwise )
@@ -86,7 +87,7 @@
                , foldedCase :: !s -- ^ Retrieve the case folded string-like value.
                                   --   (Also see 'foldCase').
                }
-          deriving Typeable
+          deriving (Data, Typeable)
 
 -- | Make the given string-like value case insensitive.
 mk :: FoldCase s => s -> CI s
diff --git a/case-insensitive.cabal b/case-insensitive.cabal
--- a/case-insensitive.cabal
+++ b/case-insensitive.cabal
@@ -1,5 +1,5 @@
 name:          case-insensitive
-version:       1.1.0.3
+version:       1.2.0.0
 cabal-version: >=1.8
 build-type:    Simple
 license:       BSD3