diff --git a/Data/Vector/Unboxed/Deriving.hs b/Data/Vector/Unboxed/Deriving.hs
--- a/Data/Vector/Unboxed/Deriving.hs
+++ b/Data/Vector/Unboxed/Deriving.hs
@@ -11,7 +11,7 @@
 
 {-|
 Module:      Data.Vector.Unboxed.Deriving
-Copyright:   © 2012−2013 Liyang HU
+Copyright:   © 2012−2014 Liyang HU
 License:     BSD3
 Maintainer:  vector-th-unbox@liyang.hu
 Stability:   experimental
@@ -34,7 +34,7 @@
 (but not earlier nor later) needs the 'G.Vector' and 'M.MVector' class
 method names to be in scope in order to define the appropriate instances:
 
->#if __GLASGOW_HASKELL == 704
+>#if __GLASGOW_HASKELL__ == 704
 >import qualified Data.Vector.Generic
 >import qualified Data.Vector.Generic.Mutable
 >#endif
@@ -76,7 +76,11 @@
 
 -- Turn any 'Name' into a capturable one.
 capture :: Name -> Name
+#if __GLASGOW_HASKELL__ == 704
 capture = mkName . nameBase
+#else
+capture = id
+#endif
 
 liftE :: Exp -> Exp -> Exp
 liftE e = InfixE (Just e) (VarE 'liftM) . Just
diff --git a/tests/sanity.hs b/tests/sanity.hs
--- a/tests/sanity.hs
+++ b/tests/sanity.hs
@@ -4,16 +4,15 @@
 {-# LANGUAGE TypeFamilies #-}
 {-# LANGUAGE UnicodeSyntax #-}
 {-# OPTIONS_GHC -fno-warn-orphans #-}
-#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ < 706
-{-# OPTIONS_GHC -fno-warn-unused-imports #-}
-#endif
 
 module Main (main) where
 
 import Prelude
 import Data.Default
+#if __GLASGOW_HASKELL__ == 704
 import qualified Data.Vector.Generic
 import qualified Data.Vector.Generic.Mutable
+#endif
 import Data.Vector.Unboxed.Base (Unbox)
 import Data.Vector.Unboxed.Deriving
 
diff --git a/vector-th-unbox.cabal b/vector-th-unbox.cabal
--- a/vector-th-unbox.cabal
+++ b/vector-th-unbox.cabal
@@ -1,5 +1,5 @@
 name:           vector-th-unbox
-version:        0.2.0.2
+version:        0.2.1.0
 synopsis:       Deriver for Data.Vector.Unboxed using Template Haskell
 description:
     A Template Haskell deriver for unboxed vectors, given a pair of coercion