diff --git a/src/Uber/Client.hs b/src/Uber/Client.hs
--- a/src/Uber/Client.hs
+++ b/src/Uber/Client.hs
@@ -14,7 +14,7 @@
 import Uber.Types.Reminder
 import WebApi
 
--- | Returns information about the Uber products offered at a given location 
+-- | Returns information about the Uber products offered at a given location
 getProducts :: Settings -> LatLng -> IO (Response GET ProductsR)
 getProducts settings ll = do
     client (addV1 $ toClientSettings settings) $
@@ -24,7 +24,7 @@
 getProductDetails :: Settings -> ProductId -> IO (Response GET ProductDetailsR)
 getProductDetails settings (ProductId pid) = do
     client (addV1 $ toClientSettings settings) $
-        Request (ProdId $ Field pid) () () () (auth settings) () ()
+        Request (ProdId pid) () () () (auth settings) () ()
 
 -- | Returns an estimated price range for each product offered at a given location
 getPriceEstimate :: Settings -> PriceEstimateParams -> IO (Response GET PriceEstimateR)
diff --git a/src/Uber/Types/History.hs b/src/Uber/Types/History.hs
--- a/src/Uber/Types/History.hs
+++ b/src/Uber/Types/History.hs
@@ -38,7 +38,7 @@
     , longitude :: Double
     } deriving (Show, Generic)
 
-instance ToParam HistoryParams 'QueryParam
+instance ToParam 'QueryParam HistoryParams
 instance FromJSON History where
 instance FromJSON City where
 instance FromJSON HistoryResp where
diff --git a/src/Uber/Types/PriceEstimate.hs b/src/Uber/Types/PriceEstimate.hs
--- a/src/Uber/Types/PriceEstimate.hs
+++ b/src/Uber/Types/PriceEstimate.hs
@@ -32,6 +32,6 @@
     , distance         :: Double
     } deriving (Show, Generic)
 
-instance ToParam PriceEstimateParams 'QueryParam
+instance ToParam 'QueryParam PriceEstimateParams
 instance FromJSON PriceEstimates
 instance FromJSON PriceEstimate
diff --git a/src/Uber/Types/Product.hs b/src/Uber/Types/Product.hs
--- a/src/Uber/Types/Product.hs
+++ b/src/Uber/Types/Product.hs
@@ -1,6 +1,7 @@
 {-# LANGUAGE DataKinds             #-}
 {-# LANGUAGE DeriveGeneric         #-}
 {-# LANGUAGE MultiParamTypeClasses #-}
+{-# LANGUAGE OverloadedStrings     #-}
 module Uber.Types.Product where
 
 import Data.Aeson
@@ -44,13 +45,13 @@
     } deriving (Show, Generic)
 
 newtype ProdId = ProdId
-    { pid :: Field "product_id" Text
+    { pid :: Text
     } deriving (Generic)
 
 data ProductId = ProductId Text
 
-instance ToParam LatLng 'QueryParam
-instance ToParam ProdId 'PathParam
+instance ToParam 'QueryParam LatLng
+instance ToParam 'PathParam ProdId
 instance FromJSON Products
 instance FromJSON Product
 instance FromJSON PriceDetails
diff --git a/src/Uber/Types/TimeEstimate.hs b/src/Uber/Types/TimeEstimate.hs
--- a/src/Uber/Types/TimeEstimate.hs
+++ b/src/Uber/Types/TimeEstimate.hs
@@ -25,7 +25,7 @@
     , t_estimate     :: Int
     } deriving (Show, Generic)
 
-instance ToParam TimeEstimateParams 'QueryParam
+instance ToParam 'QueryParam TimeEstimateParams
 instance FromJSON TimeEstimates where
 instance FromJSON TimeEstimate where
     parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = drop 2 }
diff --git a/uber.cabal b/uber.cabal
--- a/uber.cabal
+++ b/uber.cabal
@@ -1,16 +1,14 @@
 name:                uber
-version:             0.1.0.0
-synopsis:            Uber client for Haskell 
+version:             0.1.1.0
+synopsis:            Uber client for Haskell
 description:         Bindings for Uber API
 homepage:            https://github.com/byteally/webapi-uber.git
 license:             BSD3
 license-file:        LICENSE
 author:              Tarun
 maintainer:          Tarun <tj.joshi7@gmail.com>
---copyright:           2016 Author name here
 category:            Web, Network
 build-type:          Simple
--- extra-source-files:
 cabal-version:       >=1.10
 
 library
@@ -28,10 +26,10 @@
                      , Uber.Types.RideRequest
                      , Uber.Types.Misc
                      , Uber.Types.Reminder
-  build-depends:       base >= 4.7 && < 5
-                     , aeson
-                     , text
-                     , webapi == 0.2.*
+  build-depends:       base  >= 4.7 && < 5
+                     , aeson >= 0.8 && < 0.12
+                     , text  >= 1.2 && < 1.3
+                     , webapi == 0.3.*
   default-language:    Haskell2010
 
 test-suite uber-test
