aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock
diff options
context:
space:
mode:
Diffstat (limited to 'src/Haddock')
-rw-r--r--src/Haddock/GhcUtils.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/GhcUtils.hs b/src/Haddock/GhcUtils.hs
index 82ccb590..467541fc 100644
--- a/src/Haddock/GhcUtils.hs
+++ b/src/Haddock/GhcUtils.hs
@@ -182,7 +182,7 @@ instance Foldable (GenLocated l) where
instance Traversable (GenLocated l) where
mapM f (L l x) = (return . L l) =<< f x
-
+ traverse f (L l x) = L l <$> f x
-------------------------------------------------------------------------------
-- * NamedThing instances