diff --git a/Handler/Common.hs b/Handler/Common.hs
index cb35dda..ce06c17 100644
--- a/Handler/Common.hs
+++ b/Handler/Common.hs
@@ -217,9 +217,8 @@ sendMail to subject body =
       , mailParts =[[Part
         { partType = "text/plain; charset=utf-8"
         , partEncoding = None
-        , partFilename = Nothing
         , partHeaders = []
-        , partContent = E.encodeUtf8 body
+        , partContent = PartContent $ E.encodeUtf8 body
         }]]
       }
 
diff --git a/Settings.hs b/Settings.hs
index 37f1435..22cd795 100644
--- a/Settings.hs
+++ b/Settings.hs
@@ -20,7 +20,7 @@
 -- declared in the Foundation.hs file.
 module Settings where
 
-import ClassyPrelude.Yesod hiding (throw)
+import ClassyPrelude.Yesod
 import Control.Exception          (throw)
 import Data.Aeson                 (Result (..), fromJSON, withObject, (.!=),
                                    (.:?))