Get rid of export lists

yesod/scaffold/Foundation.hs.cg

@@ -1,17 +1,4 @@
-module Foundation
+module Foundation where
-    ( ~sitearg~ (..)
-    , Route (..)
-    , ~sitearg~Message (..)
-    , resources~sitearg~
-    , Handler
-    , Widget
-    , Form
-    , maybeAuth
-    , requireAuth
-    , module Settings
-    , module Model
-    , getExtra
-    ) where
 
 import Prelude
 import Yesod

yesod/scaffold/Import.hs.cg

@@ -1,31 +1,28 @@
 module Import
-    ( module Prelude
+    ( module Import
-    , module Yesod
-    , module Foundation
-    , module Settings.StaticFiles
-    , module Settings.Development
-    , module Data.Monoid
-    , module Control.Applicative
-    , Text
-#if __GLASGOW_HASKELL__ < 704
-    , (<>)
-#endif
     ) where
 
-import Prelude hiding (writeFile, readFile, head, tail, init, last)
+import           Prelude              as Import hiding (head, init, last,
-import Yesod   hiding (Route(..))
+                                                 readFile, tail, writeFile)
-import Foundation
+import           Yesod                as Import hiding (Route (..))
-#if __GLASGOW_HASKELL__ < 704
+
-import Data.Monoid (Monoid (mappend, mempty, mconcat))
+import           Control.Applicative  as Import (pure, (<$>), (<*>))
-#else
+import           Data.Text            as Import (Text)
-import Data.Monoid (Monoid (mappend, mempty, mconcat), (<>))
+
-#endif
+import           Foundation           as Import
-import Control.Applicative ((<$>), (<*>), pure)
+import           Model                as Import
-import Data.Text (Text)
+import           Settings             as Import
-import Settings.StaticFiles
+import           Settings.Development as Import
-import Settings.Development
+import           Settings.StaticFiles as Import
+
+#if __GLASGOW_HASKELL__ >= 704
+import           Data.Monoid          as Import
+                                                 (Monoid (mappend, mempty, mconcat),
+                                                 (<>))
+#else
+import           Data.Monoid          as Import
+                                                 (Monoid (mappend, mempty, mconcat))
 
-#if __GLASGOW_HASKELL__ < 704
 infixr 5 <>
 (<>) :: Monoid m => m -> m -> m
 (<>) = mappend

yesod/scaffold/Settings.hs.cg

@@ -3,14 +3,7 @@
 -- In addition, you can configure a number of different aspects of Yesod
 -- by overriding methods in the Yesod typeclass. That instance is
 -- declared in the Foundation.hs file.
-module Settings
+module Settings where
-    ( widgetFile
-    , PersistConfig
-    , staticRoot
-    , staticDir
-    , Extra (..)
-    , parseExtra
-    ) where
 
 import Prelude
 import Text.Shakespeare.Text (st)

yesod/scaffold/tests/main.hs.cg

@@ -5,7 +5,6 @@
 module Main where
 
 import Import
-import Settings
 import Yesod.Default.Config
 import Yesod.Test
 import Application (makeFoundation)