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/Hyperlinker/Renderer.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'haddock-api/src/Haddock/Backends/Hyperlinker/Renderer.hs')

diff --git a/haddock-api/src/Haddock/Backends/Hyperlinker/Renderer.hs b/haddock-api/src/Haddock/Backends/Hyperlinker/Renderer.hs
index 12f37ced..cacb0dc7 100644
--- a/haddock-api/src/Haddock/Backends/Hyperlinker/Renderer.hs
+++ b/haddock-api/src/Haddock/Backends/Hyperlinker/Renderer.hs
@@ -141,7 +141,7 @@ richToken srcs details Token{..}
 
     contexts = concatMap (Set.elems . identInfo) . Map.elems . nodeIdentifiers $ details
 
-    -- pick an arbitary non-evidence identifier to hyperlink with
+    -- pick an arbitrary non-evidence identifier to hyperlink with
     identDet = Map.lookupMin $ Map.filter notEvidence $ nodeIdentifiers $ details
     notEvidence = not . any isEvidenceContext . identInfo
 
-- 
cgit v1.2.3