From 29d104c6e6055a5190edeb2607d54dda4f0e8abd Mon Sep 17 00:00:00 2001
From: nineonine <mail4chemik@gmail.com>
Date: Fri, 7 May 2021 21:40:22 -0700
Subject: Implement :info for record pattern synonyms (#19462)

---
 ghc/GHCi/UI.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'ghc/GHCi/UI.hs')

diff --git a/ghc/GHCi/UI.hs b/ghc/GHCi/UI.hs
index 7817cd974f..4e90e930c2 100644
--- a/ghc/GHCi/UI.hs
+++ b/ghc/GHCi/UI.hs
@@ -1538,7 +1538,7 @@ infoThing allInfo str = do
                                      (catMaybes mb_stuffs)
     return $ vcat (intersperse (text "") $ map pprInfo filtered)
 
-  -- Filter out names whose parent is also there Good
+  -- Filter out names whose parent is also there. Good
   -- example is '[]', which is both a type and data
   -- constructor in the same type
 filterOutChildren :: (a -> TyThing) -> [a] -> [a]
-- 
cgit v1.2.1