diff --git a/classy-influxdb-simple.cabal b/classy-influxdb-simple.cabal
--- a/classy-influxdb-simple.cabal
+++ b/classy-influxdb-simple.cabal
@@ -1,5 +1,5 @@
 name:                classy-influxdb-simple
-version:             0.1.0.1
+version:             0.1.0.2
 synopsis:            Super simple InfluxDB package in Classy-MTL style
 -- description:
 homepage:            https://github.com/mankyKitty/classy-influxdb-simple#readme
@@ -25,6 +25,7 @@
                      , bytestring
                      , text
                      , async-io-either
+                     , vector
   default-language:    Haskell2010
 
 source-repository head
diff --git a/src/Database/InfluxDB/Simple/Classy.hs b/src/Database/InfluxDB/Simple/Classy.hs
--- a/src/Database/InfluxDB/Simple/Classy.hs
+++ b/src/Database/InfluxDB/Simple/Classy.hs
@@ -6,7 +6,6 @@
   , queryDataToCSV
   ) where
 
-
 import           Control.Lens                          (to, view, (.~), (^.))
 import           Control.Monad.Error.Lens              (throwing)
 
diff --git a/src/Database/InfluxDB/Simple/Classy/Types.hs b/src/Database/InfluxDB/Simple/Classy/Types.hs
--- a/src/Database/InfluxDB/Simple/Classy/Types.hs
+++ b/src/Database/InfluxDB/Simple/Classy/Types.hs
@@ -2,8 +2,19 @@
 {-# LANGUAGE GeneralizedNewtypeDeriving #-}
 {-# LANGUAGE OverloadedStrings          #-}
 {-# LANGUAGE TemplateHaskell            #-}
-{-# LANGUAGE CPP #-}
-module Database.InfluxDB.Simple.Classy.Types where
+module Database.InfluxDB.Simple.Classy.Types
+  ( InfluxRqType (..)
+  , ToLine (..)
+  , IsDb (..)
+  , InfluxQuery (..)
+  , InfluxDBConfig (..)
+  , HasInfluxDBConfig (..)
+  , InfluxDbError (..)
+  , AsInfluxDbError (..)
+  , CanInflux
+  , basicInfluxOpts
+  , rqWinCode
+  ) where
 
 import           Control.Exception      (SomeException)
 import           Control.Lens           (makeClassy, makeClassyPrisms, (.~),
@@ -18,10 +29,8 @@
 
 import           Data.Text              (Text)
 
-#if VERSION_vector
 import           Data.Vector            (Vector)
 import qualified Data.Vector            as V
-#endif
 
 import           GHC.Word               (Word32)
 
@@ -45,16 +54,11 @@
 instance ToLine a => ToLine [a] where
   toLine = BS8.unlines . fmap toLine
 
-#if VERSION_vector
 instance ToLine a => ToLine (Vector a) where
   toLine = BS8.unlines . V.toList . fmap toLine
-#endif
 
 class IsDb a where
   toDbName :: a -> Text
-
-newtype Count = Count Word32
-  deriving (Eq, Show, Ord, Num)
 
 newtype InfluxQuery = InfluxQuery ByteString
   deriving (Eq, Show)