Placed App after mkYesod in the RawResponse test.

2015-08-23 22:53:13 +02:00 · 2015-08-23 22:53:13 +02:00 · 5375bacf81
commit 5375bacf81
parent e77f6bd709
1 changed files with 2 additions and 2 deletions
--- a/yesod-core/test/YesodCoreTest/RawResponse.hs
+++ b/yesod-core/test/YesodCoreTest/RawResponse.hs
@ -24,14 +24,14 @@ import Data.Streaming.Network (bindPortTCP)
 import Network.HTTP.Types (status200)
 import Blaze.ByteString.Builder (fromByteString)

-data App = App
-
 mkYesod "App" [parseRoutes|
 / HomeR GET
 /wai-stream WaiStreamR GET
 /wai-app-stream WaiAppStreamR GET
 |]

+data App = App
+
 instance Yesod App

 getHomeR :: Handler ()