diff --git a/yesod-core/Yesod/Routes/TH/Dispatch.hs b/yesod-core/Yesod/Routes/TH/Dispatch.hs
index f45789e2..a49dc8e4 100644
--- a/yesod-core/Yesod/Routes/TH/Dispatch.hs
+++ b/yesod-core/Yesod/Routes/TH/Dispatch.hs
@@ -13,7 +13,6 @@ import Control.Monad (forM)
 import Data.List (foldl')
 import Control.Arrow (second)
 import System.Random (randomRIO)
-import Yesod.Core.Types (HandlerT)
 import Yesod.Routes.TH.Types
 import Data.Char (toLower)
 
diff --git a/yesod-core/test/Hierarchy.hs b/yesod-core/test/Hierarchy.hs
index ddc15847..6c746014 100644
--- a/yesod-core/test/Hierarchy.hs
+++ b/yesod-core/test/Hierarchy.hs
@@ -119,6 +119,7 @@ do
         , mds404 = [|pack "404"|]
         , mds405 = [|pack "405"|]
         , mdsGetHandler = defaultGetHandler
+        , mdsUnwrapper = return
         } resources
     return
         $ InstanceD
diff --git a/yesod-core/test/RouteSpec.hs b/yesod-core/test/RouteSpec.hs
index 1d940ac3..3471a0e2 100644
--- a/yesod-core/test/RouteSpec.hs
+++ b/yesod-core/test/RouteSpec.hs
@@ -92,6 +92,7 @@ do
         , mds404 = [|pack "404"|]
         , mds405 = [|pack "405"|]
         , mdsGetHandler = defaultGetHandler
+        , mdsUnwrapper = return
         } ress
     return
         $ InstanceD