ivan-m / haskell-docs

Get the Haskell documentation of a name from a module
BSD 3-Clause "New" or "Revised" License
32 stars 8 forks source link

Build failure with the latest haddock snapshots for ghc 7.8 #5

Closed vikraman closed 10 years ago

vikraman commented 10 years ago

Some types have changed. This is my attempt at a fix.

diff --git i/src/Main.hs w/src/Main.hs
index bfd67b6..9d2b034 100644
--- i/src/Main.hs
+++ w/src/Main.hs
@@ -184,7 +184,7 @@ formatDoc = trim . go where
 #else
   go (DocURL url) = url
 #endif
-  go (DocPic pic) = pic
+  go (DocPic pic) = show pic
   go (DocAName name) = name
   go (DocExamples exs) = unlines (map formatExample exs)

@@ -248,4 +248,4 @@ withInitializedPackages cont = do

 instance Show ModuleName where show = show . moduleNameString
 instance Show OccName where show = show . occNameString
-deriving instance Show (Doc String)
+instance Show (Doc String) where show = formatDoc
chrisdone commented 10 years ago

Any chance of adding some IFDEF's for 7.8? I don't have 7.8 with which to test right now.