fix warnings

This commit is contained in:
Greg Weber 2015-06-11 00:03:29 -04:00
parent c5b27de2ab
commit 12a82ff8a5
9 changed files with 3 additions and 16 deletions

View File

@ -27,12 +27,11 @@ module Yesod.Core.Json
, acceptsJson
) where
import Yesod.Core.Handler (HandlerT, getRequest, invalidArgs, redirect, selectRep, provideRep, rawRequestBody, ProvidedRep)
import Yesod.Core.Handler (getRequest, invalidArgs, redirect, provideRep, rawRequestBody, ProvidedRep)
import Control.Monad.Trans.Writer (Writer)
import Data.Monoid (Endo)
import Yesod.Core.Content (TypedContent)
import Yesod.Core.Types (reqAccept)
import Yesod.Core.Class.Yesod (Yesod, defaultLayoutJson)
import Yesod.Core.Class.Yesod (defaultLayoutJson)
import Yesod.Core.Class.Handler
import Yesod.Routes.Class
import qualified Data.Aeson as J

View File

@ -13,8 +13,6 @@ import Yesod.Core
import Data.IORef.Lifted
import Data.Typeable (Typeable)
import qualified Data.ByteString.Lazy.Char8 as L8
import Data.Text (Text)
import Data.Text.Encoding (encodeUtf8)
data C = C

View File

@ -6,11 +6,9 @@ module YesodCoreTest.ErrorHandling
) where
import Yesod.Core
import Text.Hamlet (hamlet)
import Yesod.Core.Widget
import Test.Hspec
import Network.Wai
import Network.Wai.Test
import Text.Hamlet (hamlet)
import qualified Data.ByteString.Lazy as L
import qualified Data.ByteString.Char8 as S8
import Control.Exception (SomeException, try)

View File

@ -8,7 +8,6 @@ import YesodCoreTest.JsLoaderSites.Bottom (B(..))
import Test.Hspec
import Yesod.Core
import Yesod.Core.Widget
import Network.Wai.Test
data H = H

View File

@ -6,7 +6,6 @@ module YesodCoreTest.Links (linksTest) where
import Test.Hspec
import Yesod.Core
import Yesod.Core.Widget
import Text.Hamlet
import Network.Wai
import Network.Wai.Test

View File

@ -7,7 +7,6 @@ import Test.Hspec
import YesodCoreTest.NoOverloadedStringsSub
import Yesod.Core
import Yesod.Core.Widget
import Text.Hamlet (hamlet)
import Network.Wai.Test
import Network.Wai (pathInfo)

View File

@ -8,7 +8,6 @@
module YesodCoreTest.NoOverloadedStringsSub where
import Yesod.Core
import Network.Wai
import Yesod.Core.Types
data Subsite = Subsite (forall master. Yesod master => YesodSubRunnerEnv Subsite master (HandlerT master IO) -> Application)

View File

@ -3,11 +3,7 @@ module YesodCoreTest.RawResponse (specs) where
import Yesod.Core
import Test.Hspec
import qualified Data.Map as Map
import Network.Wai.Test
import Network.Wai (responseStream)
import Data.Text (Text)
import Data.ByteString.Lazy (ByteString)
import qualified Data.Conduit.List as CL
import qualified Data.ByteString.Char8 as S8
import Data.Conduit

View File

@ -31,7 +31,7 @@ library
exposed-modules: Yesod.Shakespeare
ghc-options: -Wall -ddump-splices -ddump-to-file
ghc-options: -Wall
-- Following line added due to: https://github.com/yesodweb/yesod/issues/545
-- This looks like a GHC bug
extensions: MultiParamTypeClasses