diff --git a/hw-kafka-client.cabal b/hw-kafka-client.cabal
--- a/hw-kafka-client.cabal
+++ b/hw-kafka-client.cabal
@@ -1,5 +1,5 @@
 name:                hw-kafka-client
-version:             2.0.3
+version:             2.0.4
 homepage:            https://github.com/haskell-works/hw-kafka-client
 bug-reports:         https://github.com/haskell-works/hw-kafka-client/issues
 license:             MIT
diff --git a/src/Kafka/Types.hs b/src/Kafka/Types.hs
--- a/src/Kafka/Types.hs
+++ b/src/Kafka/Types.hs
@@ -22,7 +22,7 @@
 newtype KafkaConf = KafkaConf RdKafkaConfTPtr deriving Show
 newtype TopicConf = TopicConf RdKafkaTopicConfTPtr deriving Show
 
-newtype PartitionId = PartitionId Int deriving (Show, Eq, Read, Ord)
+newtype PartitionId = PartitionId Int deriving (Show, Eq, Read, Ord, Enum)
 newtype Millis      = Millis Int64 deriving (Show, Read, Eq, Ord, Num)
 newtype ClientId    = ClientId String deriving (Show, Eq, Ord)