From 2e0b79734bafea5ad10be90eef64bb8366577fad Mon Sep 17 00:00:00 2001
From: Benjamin Goldstein <55495154+benjamingoldstein@users.noreply.github.com>
Date: Wed, 16 Oct 2019 14:14:44 +0200
Subject: [PATCH] Fix broken use of Network.Mail.Mime

as per https://github.com/yesodweb/yesodweb.com-content/issues/241
---
 cookbook/yesod-auth-json.md | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/cookbook/yesod-auth-json.md b/cookbook/yesod-auth-json.md
index e693e35..315eedd 100644
--- a/cookbook/yesod-auth-json.md
+++ b/cookbook/yesod-auth-json.md
@@ -124,9 +124,9 @@ instance YesodAuthEmail App where
         Part
         { partType = "text/plain; charset=utf-8"
         , partEncoding = None
-        , partFilename = Nothing
+        , partDisposition = DefaultDisposition
         , partContent =
-          Data.Text.Lazy.Encoding.encodeUtf8
+          PartContent $ Data.Text.Lazy.Encoding.encodeUtf8
             [stext|
                     Please confirm your email address by clicking on the link below.
 
@@ -140,9 +140,9 @@ instance YesodAuthEmail App where
         Part
         { partType = "text/html; charset=utf-8"
         , partEncoding = None
-        , partFilename = Nothing
+        , partDisposition = DefaultDisposition
         , partContent =
-          renderHtml
+          PartContent $ renderHtml
             [shamlet|
                     <p>Please confirm your email address by clicking on the link below.
                     <p>