Position the module header the same way everywhere

Silly, but nice with some consistency :-)

22 files changed, 2 insertions, 27 deletions

diff --git a/src/Documentation/Haddock.hs b/src/Documentation/Haddock.hs
index 5216b511..49732657 100644
--- a/src/Documentation/Haddock.hs
+++ b/src/Documentation/Haddock.hs
@@ -11,8 +11,6 @@
 -- The Haddock API: A rudimentory, highly experimental API exposing some of
 -- the internals of Haddock. Don't expect it to be stable.
 -----------------------------------------------------------------------------
-
-
 module Documentation.Haddock (
 
   -- * Interface
diff --git a/src/Haddock/Backends/DevHelp.hs b/src/Haddock/Backends/DevHelp.hs
index aec6d416..c42f494a 100644
--- a/src/Haddock/Backends/DevHelp.hs
+++ b/src/Haddock/Backends/DevHelp.hs
@@ -9,7 +9,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Backends.DevHelp (ppDevHelpFile) where
 
 import Haddock.ModuleTree
diff --git a/src/Haddock/Backends/HH.hs b/src/Haddock/Backends/HH.hs
index 8446de74..ea14d41a 100644
--- a/src/Haddock/Backends/HH.hs
+++ b/src/Haddock/Backends/HH.hs
@@ -8,7 +8,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Backends.HH (ppHHContents, ppHHIndex, ppHHProject) where
 
 ppHHContents, ppHHIndex, ppHHProject :: a
diff --git a/src/Haddock/Backends/HH2.hs b/src/Haddock/Backends/HH2.hs
index f89e6ad6..406ad87e 100644
--- a/src/Haddock/Backends/HH2.hs
+++ b/src/Haddock/Backends/HH2.hs
@@ -8,7 +8,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Backends.HH2 (ppHH2Contents, ppHH2Index, ppHH2Files, ppHH2Collection) where
 
 import Haddock.Types
diff --git a/src/Haddock/Backends/HaddockDB.hs b/src/Haddock/Backends/HaddockDB.hs
index ee9722ad..1c248bfb 100644
--- a/src/Haddock/Backends/HaddockDB.hs
+++ b/src/Haddock/Backends/HaddockDB.hs
@@ -8,7 +8,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Backends.HaddockDB (ppDocBook) where
 
 {-
diff --git a/src/Haddock/Backends/Hoogle.hs b/src/Haddock/Backends/Hoogle.hs
index 2d4ece4b..e597bab0 100644
--- a/src/Haddock/Backends/Hoogle.hs
+++ b/src/Haddock/Backends/Hoogle.hs
@@ -11,7 +11,6 @@
 -- Write out Hoogle compatible documentation
 -- http://www.haskell.org/hoogle/
 -----------------------------------------------------------------------------
-
 module Haddock.Backends.Hoogle ( 
     ppHoogle
   ) where
diff --git a/src/Haddock/Convert.hs b/src/Haddock/Convert.hs
index 1b2df768..3e339e82 100644
--- a/src/Haddock/Convert.hs
+++ b/src/Haddock/Convert.hs
@@ -12,10 +12,9 @@
 -- Conversion between TyThing and HsDecl. This functionality may be moved into
 -- GHC at some point.
 -----------------------------------------------------------------------------
-
+module Haddock.Convert where
 -- Some other functions turned out to be useful for converting
 -- instance heads, which aren't TyThings, so just export everything.
-module Haddock.Convert where
 
 import HsSyn
 import TcType ( tcSplitSigmaTy )
diff --git a/src/Haddock/Doc.hs b/src/Haddock/Doc.hs
index adafc8fd..ca3b6658 100644
--- a/src/Haddock/Doc.hs
+++ b/src/Haddock/Doc.hs
@@ -27,6 +27,7 @@ docAppend d DocEmpty = d
 docAppend d1 d2
   = DocAppend d1 d2
 
+
 -- again to make parsing easier - we spot a paragraph whose only item
 -- is a DocMonospaced and make it into a DocCodeBlock
 docParagraph :: Doc id -> Doc id
diff --git a/src/Haddock/GhcUtils.hs b/src/Haddock/GhcUtils.hs
index 2184bbfc..1e3d366b 100644
--- a/src/Haddock/GhcUtils.hs
+++ b/src/Haddock/GhcUtils.hs
@@ -13,7 +13,6 @@
 --
 -- Utils for dealing with types from the GHC API
 -----------------------------------------------------------------------------
-
 module Haddock.GhcUtils where
 
 
diff --git a/src/Haddock/Interface/AttachInstances.hs b/src/Haddock/Interface/AttachInstances.hs
index abc5f053..09d38b4f 100644
--- a/src/Haddock/Interface/AttachInstances.hs
+++ b/src/Haddock/Interface/AttachInstances.hs
@@ -11,7 +11,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Interface.AttachInstances (attachInstances) where
 
 
diff --git a/src/Haddock/Interface/Create.hs b/src/Haddock/Interface/Create.hs
index 3014fb45..224df2c4 100644
--- a/src/Haddock/Interface/Create.hs
+++ b/src/Haddock/Interface/Create.hs
@@ -9,7 +9,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Interface.Create (createInterface) where
 
 
diff --git a/src/Haddock/Interface/ExtractFnArgDocs.hs b/src/Haddock/Interface/ExtractFnArgDocs.hs
index d3d7160f..8889c3ab 100644
--- a/src/Haddock/Interface/ExtractFnArgDocs.hs
+++ b/src/Haddock/Interface/ExtractFnArgDocs.hs
@@ -8,7 +8,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Interface.ExtractFnArgDocs (
   getDeclFnArgDocs, getSigFnArgDocs, getTypeFnArgDocs
 ) where
diff --git a/src/Haddock/Interface/LexParseRn.hs b/src/Haddock/Interface/LexParseRn.hs
index 5b1dd8b5..a92c9c46 100644
--- a/src/Haddock/Interface/LexParseRn.hs
+++ b/src/Haddock/Interface/LexParseRn.hs
@@ -1,4 +1,3 @@
-
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Haddock.Interface.LexParseRn
@@ -9,7 +8,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Interface.LexParseRn (
   HaddockCommentType(..),
   lexParseRnHaddockComment,
diff --git a/src/Haddock/Interface/ParseModuleHeader.hs b/src/Haddock/Interface/ParseModuleHeader.hs
index c28effad..d0e3e5fb 100644
--- a/src/Haddock/Interface/ParseModuleHeader.hs
+++ b/src/Haddock/Interface/ParseModuleHeader.hs
@@ -1,4 +1,3 @@
-
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Haddock.Interface.ParseModuleHeader
@@ -9,7 +8,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Interface.ParseModuleHeader (parseModuleHeader) where
 
 import Haddock.Types
diff --git a/src/Haddock/Interface/Rename.hs b/src/Haddock/Interface/Rename.hs
index 8e1476d3..e28ff639 100644
--- a/src/Haddock/Interface/Rename.hs
+++ b/src/Haddock/Interface/Rename.hs
@@ -9,7 +9,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Interface.Rename (renameInterface) where
 
 
diff --git a/src/Haddock/Interface/Rn.hs b/src/Haddock/Interface/Rn.hs
index a115225a..99c5d3ea 100644
--- a/src/Haddock/Interface/Rn.hs
+++ b/src/Haddock/Interface/Rn.hs
@@ -1,4 +1,3 @@
-
 module Haddock.Interface.Rn ( rnDoc, rnHaddockModInfo ) where
 
 import Haddock.Types
diff --git a/src/Haddock/InterfaceFile.hs b/src/Haddock/InterfaceFile.hs
index 6a3e777c..2fb1e223 100644
--- a/src/Haddock/InterfaceFile.hs
+++ b/src/Haddock/InterfaceFile.hs
@@ -11,7 +11,6 @@
 --
 -- Reading and writing the .haddock interface file
 -----------------------------------------------------------------------------
-
 module Haddock.InterfaceFile (
   InterfaceFile(..),
   readInterfaceFile, nameCacheFromGhc, freshNameCache, NameCacheAccessor,
diff --git a/src/Haddock/ModuleTree.hs b/src/Haddock/ModuleTree.hs
index 855c00dd..f3008d75 100644
--- a/src/Haddock/ModuleTree.hs
+++ b/src/Haddock/ModuleTree.hs
@@ -9,7 +9,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.ModuleTree ( ModuleTree(..), mkModuleTree ) where
 
 import Haddock.Types ( Doc )
diff --git a/src/Haddock/Options.hs b/src/Haddock/Options.hs
index 9b670529..e289ab65 100644
--- a/src/Haddock/Options.hs
+++ b/src/Haddock/Options.hs
@@ -11,8 +11,6 @@
 --
 -- Definition of the command line interface of Haddock
 -----------------------------------------------------------------------------
-
-
 module Haddock.Options (
   parseHaddockOpts,
   Flag(..),
diff --git a/src/Haddock/Utils.hs b/src/Haddock/Utils.hs
index 11366b3f..9e7aeb2a 100644
--- a/src/Haddock/Utils.hs
+++ b/src/Haddock/Utils.hs
@@ -10,8 +10,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
-
 module Haddock.Utils (
 
   -- * Misc utilities
diff --git a/src/Haddock/Version.hs b/src/Haddock/Version.hs
index 178e4811..f4729c7d 100644
--- a/src/Haddock/Version.hs
+++ b/src/Haddock/Version.hs
@@ -8,7 +8,6 @@
 -- Stability   :  experimental
 -- Portability :  portable
 -----------------------------------------------------------------------------
-
 module Haddock.Version ( 
   projectName, projectVersion, projectUrl
 ) where
diff --git a/src/Main.hs b/src/Main.hs
index ad0ff42e..5a4e27cc 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -15,7 +15,6 @@
 --
 -- Program entry point and top-level code.
 -----------------------------------------------------------------------------
-
 module Main (main) where