From 57491ab4ac6263d9d9a11e972e7a95c840c299de Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Tue, 3 Jan 2012 18:31:29 +0000 Subject: Follow rename of Instance to ClsInst in GHC --- src/Haddock/Backends/Hoogle.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Haddock/Backends') diff --git a/src/Haddock/Backends/Hoogle.hs b/src/Haddock/Backends/Hoogle.hs index 6e3e306a..593f03bc 100644 --- a/src/Haddock/Backends/Hoogle.hs +++ b/src/Haddock/Backends/Hoogle.hs @@ -150,7 +150,7 @@ ppClass x = out x{tcdSigs=[]} : (map (reL . HsTyVar . hsTyVarName . unL) (tcdTyVars x)) -ppInstance :: Instance -> [String] +ppInstance :: ClsInst -> [String] ppInstance x = [dropComment $ out x] -- cgit v1.2.3