[commit: ghc] master: base: Fix confusing docs typo (fa0474d)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/fa0474da6954a3e57785fe703acc83e2fecef88f/ghc

>---------------------------------------------------------------

commit fa0474da6954a3e57785fe703acc83e2fecef88f
Author: Alexander Berntsen <alexander at plaimi.net>
Date:   Wed May 6 07:52:29 2015 -0500

    base: Fix confusing docs typo
    
    Signed-off-by: Alexander Berntsen <alexander at plaimi.net>
    
    Reviewed By: austin
    
    Differential Revision: https://phabricator.haskell.org/D872


>---------------------------------------------------------------

fa0474da6954a3e57785fe703acc83e2fecef88f
 libraries/base/Data/Traversable.hs | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/libraries/base/Data/Traversable.hs b/libraries/base/Data/Traversable.hs
index aaea44b..cc72392 100644
--- a/libraries/base/Data/Traversable.hs
+++ b/libraries/base/Data/Traversable.hs
@@ -145,10 +145,9 @@ import qualified GHC.List as List ( foldr )
 class (Functor t, Foldable t) => Traversable t where
     {-# MINIMAL traverse | sequenceA #-}
 
-    -- | Map each element of a structure to an action, evaluate these
-    -- these actions from left to right, and collect the results.
-    -- actions from left to right, and collect the results. For a
-    -- version that ignores the results see 'Data.Foldable.traverse_'.
+    -- | Map each element of a structure to an action, evaluate these actions
+    -- from left to right, and collect the results. For a version that ignores
+    -- the results see 'Data.Foldable.traverse_'.
     traverse :: Applicative f => (a -> f b) -> t a -> f (t b)
     traverse f = sequenceA . fmap f