Rename HaddockModule to Interface and a few more refactorings

1 files changed, 2 insertions, 2 deletions

diff --git a/src/Main.hs b/src/Main.hs
index c127f773..b12c7850 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -92,7 +92,7 @@ handleGhcExceptions inner =
 
 
 -------------------------------------------------------------------------------
--- Top-level
+-- Top level
 -------------------------------------------------------------------------------
 
 
@@ -142,7 +142,7 @@ main = handleTopExceptions $ do
 
 
 -- | Render the interfaces with whatever backend is specified in the flags 
-render :: [Flag] -> [HaddockModule] -> IO ()
+render :: [Flag] -> [Interface] -> IO ()
 render flags interfaces = do
   let
     title = case [str | Flag_Heading str <- flags] of