From f8b325748a3631df00841f3524b6e1f95a4e30f4 Mon Sep 17 00:00:00 2001
From: Clint Adams <clint@softwarefreedom.org>
Date: Fri, 19 Jul 2013 15:25:08 -0400
Subject: Update to newer Yesod.

---
 Import.hs | 41 +++++++++++++++++++++--------------------
 1 file changed, 21 insertions(+), 20 deletions(-)

(limited to 'Import.hs')

diff --git a/Import.hs b/Import.hs
index 641de38..e2fe88f 100644
--- a/Import.hs
+++ b/Import.hs
@@ -1,27 +1,28 @@
 module Import
-    ( module Prelude
-    , module Yesod
-    , module Foundation
-    , module Settings.StaticFiles
-    , module Settings.Development
-    , module Data.Monoid
-    , module Control.Applicative
-    , Text
-#if __GLASGOW_HASKELL__ < 704
-    , (<>)
-#endif
+    ( module Import
     ) where
 
-import Prelude hiding (writeFile, readFile, head, tail, init, last)
-import Yesod   hiding (Route(..))
-import Foundation
-import Data.Monoid (Monoid (mappend, mempty, mconcat))
-import Control.Applicative ((<$>), (<*>), pure)
-import Data.Text (Text)
-import Settings.StaticFiles
-import Settings.Development
+import           Prelude              as Import hiding (head, init, last,
+                                                 readFile, tail, writeFile)
+import           Yesod                as Import hiding (Route (..))
+
+import           Control.Applicative  as Import (pure, (<$>), (<*>))
+import           Data.Text            as Import (Text)
+
+import           Foundation           as Import
+import           Model                as Import
+import           Settings             as Import
+import           Settings.Development as Import
+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
-- 
cgit v1.2.3