diff --git a/Data/Distributive.hs b/Data/Distributive.hs
--- a/Data/Distributive.hs
+++ b/Data/Distributive.hs
@@ -17,6 +17,7 @@
 import Control.Applicative
 import Control.Comonad
 import Control.Monad.Trans.Identity
+import Control.Monad.Trans.Reader
 import Control.Monad.Instances ()
 import Data.Functor.Identity
 
@@ -49,6 +50,9 @@
 
 instance Distributive ((->)e) where
   distribute w e = fmap ($e) w
+
+instance Distributive g => Distributive (ReaderT e g) where
+  distribute w = ReaderT $ \e -> distribute (fmap (flip runReaderT e) w)
 
 instance Distributive g => Distributive (IdentityT g) where
   cotraverse f w = IdentityT $ cotraverse f (runIdentityT <$> w)
diff --git a/comonad.cabal b/comonad.cabal
--- a/comonad.cabal
+++ b/comonad.cabal
@@ -1,6 +1,6 @@
 name:          comonad
 category:      Control, Comonads
-version:       0.6.2
+version:       0.6.2.1
 license:       BSD3
 cabal-version: >= 1.6
 license-file:  LICENSE