From a127bb256ec411b2e78edba21299c5dabba3b847 Mon Sep 17 00:00:00 2001
From: askeblad <74082607+askeblad@users.noreply.github.com>
Date: Wed, 6 Apr 2022 10:47:57 -0500
Subject: spelling errors (#1471)

---
 haddock-api/src/Haddock/Backends/Xhtml/DocMarkup.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'haddock-api/src/Haddock/Backends/Xhtml')

diff --git a/haddock-api/src/Haddock/Backends/Xhtml/DocMarkup.hs b/haddock-api/src/Haddock/Backends/Xhtml/DocMarkup.hs
index bf29a7b4..02d6dafd 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml/DocMarkup.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml/DocMarkup.hs
@@ -46,7 +46,7 @@ parHtmlMarkup qual insertAnchors ppId = Markup {
   markupIdentifierUnchecked  = thecode . ppUncheckedLink qual,
   markupModule               = \(ModLink m lbl) ->
                                  let (mdl,ref) = break (=='#') m
-                                       -- Accomodate for old style
+                                       -- Accommodate for old style
                                        -- foo\#bar anchors
                                      mdl' = case reverse mdl of
                                               '\\':_ -> init mdl
-- 
cgit v1.2.3