diff --git a/bifunctors.cabal b/bifunctors.cabal
--- a/bifunctors.cabal
+++ b/bifunctors.cabal
@@ -1,6 +1,6 @@
 name:          bifunctors
 category:      Data, Functors
-version:       3.2
+version:       3.2.0.1
 license:       BSD3
 cabal-version: >= 1.6
 license-file:  LICENSE
diff --git a/src/Data/Bifunctor/Joker.hs b/src/Data/Bifunctor/Joker.hs
--- a/src/Data/Bifunctor/Joker.hs
+++ b/src/Data/Bifunctor/Joker.hs
@@ -28,7 +28,7 @@
 import Data.Semigroup.Traversable
 import Data.Traversable
 
--- | Make a 'Functor' over the first argument of a 'Bifunctor'.
+-- | Make a 'Functor' over the second argument of a 'Bifunctor'.
 newtype Joker g a b = Joker { runJoker :: g b }
   deriving (Eq,Ord,Show,Read)