diff --git a/CHANGELOG.md b/CHANGELOG.md
new file mode 100644
--- /dev/null
+++ b/CHANGELOG.md
@@ -0,0 +1,8 @@
+# CHANGELOG
+
+## 0.0.4
+### Changed
+* `base` version upper constraints relaxed to `< 5`
+
+## 0.0.3
+Changelog was not available.
diff --git a/hedis-monadic.cabal b/hedis-monadic.cabal
--- a/hedis-monadic.cabal
+++ b/hedis-monadic.cabal
@@ -1,5 +1,5 @@
 name:                hedis-monadic
-version:             0.0.3
+version:             0.0.4
 synopsis:            A la MonadReader for Redis connection
 license:             BSD3
 license-file:        LICENSE
@@ -9,6 +9,8 @@
 build-type:          Simple
 cabal-version:       >=1.10
 
+extra-source-files:  CHANGELOG.md
+
 homepage: https://bitbucket.org/s9gf4ult/redis-monadic
 source-repository head
   type: git
@@ -27,7 +29,7 @@
                     , TypeFamilies
                     , UndecidableInstances
 
-  build-depends:       base >=4.6 && <4.8
+  build-depends:       base                  >=4.6 && < 5
                      , hedis
                      , monad-control
                      , mtl
diff --git a/src/Database/Redis/Monadic.hs b/src/Database/Redis/Monadic.hs
--- a/src/Database/Redis/Monadic.hs
+++ b/src/Database/Redis/Monadic.hs
@@ -183,8 +183,8 @@
 -}
 
 runRedisTrans :: Connection
-              -> IO Int          -- microseconds to wait between transaction retry
-              -> Int             -- max transaction retries count
+              -> IO Int          -- ^ microseconds to wait between transaction retry
+              -> Int             -- ^ max transaction retries count
               -> Redis (TxResult a)
               -> IO (TxResult a)
 runRedisTrans con delay maxRepeats raction = go 0
@@ -203,8 +203,8 @@
 
 -- | Same as 'runRedisTrans' but for 'HasRedis' monad instances.
 queryRedisTrans :: (HasRedis m)
-                => IO Int        -- microseconds to wait between transaction rerun
-                -> Int           -- transactions rerun max count
+                => IO Int        -- ^ microseconds to wait between transaction rerun
+                -> Int           -- ^ transactions rerun max count
                 -> Redis (TxResult a)
                 -> m (TxResult a)
 queryRedisTrans rr maxRepeats raction = do