Fix warnings

1 files changed, 5 insertions, 3 deletions

diff --git a/src/Haddock/Backends/HH2.hs b/src/Haddock/Backends/HH2.hs
index e9cf203c..f89e6ad6 100644
--- a/src/Haddock/Backends/HH2.hs
+++ b/src/Haddock/Backends/HH2.hs
@@ -11,16 +11,18 @@
 
 module Haddock.Backends.HH2 (ppHH2Contents, ppHH2Index, ppHH2Files, ppHH2Collection) where
 
+import Haddock.Types
 
-ppHH2Contents, ppHH2Index, ppHH2Files, ppHH2Collection :: a
+ppHH2Files :: FilePath -> Maybe String -> [Interface] -> [FilePath] -> IO ()
+ppHH2Files = error "not yet"
+
+ppHH2Contents, ppHH2Index, ppHH2Collection :: a
 ppHH2Contents = error "not yet"
 ppHH2Index = error "not yet"
-ppHH2Files = error "not yet"
 ppHH2Collection = error "not yet"
 
 {-
 import HaddockModuleTree
-import HaddockTypes
 import HaddockUtil
 import HsSyn2 hiding(Doc)
 import qualified Map