fix stext whitespace

This commit is contained in:
Greg Weber 2011-08-24 09:49:27 -07:00
parent 773e8f517a
commit 6f9b0f359c

View File

@ -176,11 +176,12 @@ instance YesodAuthEmail ~sitearg~ where
, partEncoding = None , partEncoding = None
, partFilename = Nothing , partFilename = Nothing
, partContent = Data.Text.Lazy.Encoding.encodeUtf8 [stext| , partContent = Data.Text.Lazy.Encoding.encodeUtf8 [stext|
Please confirm your email address by clicking on the link below. Please confirm your email address by clicking on the link below.
#{verurl} #{verurl}
Thank you |] Thank you
|]
, partHeaders = [] , partHeaders = []
} }
htmlPart = Part htmlPart = Part