diff --git a/Yesod/Content.hs b/Yesod/Content.hs
index aaf57d60..639b8db3 100644
--- a/Yesod/Content.hs
+++ b/Yesod/Content.hs
@@ -225,7 +225,7 @@ simpleContentType :: String -> String
 simpleContentType = fst . span (/= ';')
 
 -- | A default extension to mime-type dictionary.
-typeByExt :: [(String, ContentType)]
+typeByExt :: [(String, ContentType)] -- FIXME move to yesod-static
 typeByExt =
     [ ("jpg", typeJpeg)
     , ("jpeg", typeJpeg)
diff --git a/Yesod/Dispatch.hs b/Yesod/Dispatch.hs
index d36c0905..c0eb4491 100644
--- a/Yesod/Dispatch.hs
+++ b/Yesod/Dispatch.hs
@@ -19,6 +19,7 @@ module Yesod.Dispatch
     , Strings
       -- * Convert to WAI
     , toWaiApp
+    , toWaiAppPlain
 #if TEST
     , dispatchTestSuite
 #endif