update for newer ghc+yesod
This commit is contained in:
parent
d11a7aeba7
commit
9d7a9f2b2a
2 changed files with 2 additions and 3 deletions
|
@ -217,9 +217,8 @@ sendMail to subject body =
|
||||||
, mailParts =[[Part
|
, mailParts =[[Part
|
||||||
{ partType = "text/plain; charset=utf-8"
|
{ partType = "text/plain; charset=utf-8"
|
||||||
, partEncoding = None
|
, partEncoding = None
|
||||||
, partFilename = Nothing
|
|
||||||
, partHeaders = []
|
, partHeaders = []
|
||||||
, partContent = E.encodeUtf8 body
|
, partContent = PartContent $ E.encodeUtf8 body
|
||||||
}]]
|
}]]
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
@ -20,7 +20,7 @@
|
||||||
-- declared in the Foundation.hs file.
|
-- declared in the Foundation.hs file.
|
||||||
module Settings where
|
module Settings where
|
||||||
|
|
||||||
import ClassyPrelude.Yesod hiding (throw)
|
import ClassyPrelude.Yesod
|
||||||
import Control.Exception (throw)
|
import Control.Exception (throw)
|
||||||
import Data.Aeson (Result (..), fromJSON, withObject, (.!=),
|
import Data.Aeson (Result (..), fromJSON, withObject, (.!=),
|
||||||
(.:?))
|
(.:?))
|
||||||
|
|
Loading…
Reference in a new issue