From e187816f64f0c54dc924f8283fe4c75a6e1f67b2 Mon Sep 17 00:00:00 2001
From: askeblad <74082607+askeblad@users.noreply.github.com>
Date: Wed, 16 Mar 2022 03:44:27 -0500
Subject: typos (#1464)

---
 html-test/src/Bug308.hs          | 2 +-
 html-test/src/Bug745.hs          | 2 +-
 html-test/src/ConstructorArgs.hs | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

(limited to 'html-test/src')

diff --git a/html-test/src/Bug308.hs b/html-test/src/Bug308.hs
index 93ecffac..250a0622 100644
--- a/html-test/src/Bug308.hs
+++ b/html-test/src/Bug308.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE Haskell2010 #-}
 -- From 2.14.x onwards we were forgetting to swallow ‘#’ as a special
--- character resulting in broken anchors if they accured
+-- character resulting in broken anchors if they occurred
 -- mid-paragraph. Here we check that anchors get generated as
 -- expected.
 module Bug308 where
diff --git a/html-test/src/Bug745.hs b/html-test/src/Bug745.hs
index 295ac59d..01602bb3 100644
--- a/html-test/src/Bug745.hs
+++ b/html-test/src/Bug745.hs
@@ -4,6 +4,6 @@
 module Bug574 where
 -- See https://github.com/haskell/haddock/issues/574
 
--- | Somthing with a spliced type
+-- | Something with a spliced type
 foo :: Int -> $(let i = [t| Int |] in [t| $i -> $i |])
 foo x y = x + y
diff --git a/html-test/src/ConstructorArgs.hs b/html-test/src/ConstructorArgs.hs
index c3b848c3..40697d13 100644
--- a/html-test/src/ConstructorArgs.hs
+++ b/html-test/src/ConstructorArgs.hs
@@ -50,7 +50,7 @@ pattern Bo :: Int    -- ^ an 'Int'
            -> Boo -- ^ a 'Boo' pattern
 pattern Bo x y = Foo x y
 
--- | Not bunded and no argument docs
+-- | Not bundled and no argument docs
 pattern Bo' :: Int -> String -> Boo
 pattern Bo' x y = Foo x y
 
-- 
cgit v1.2.3