aboutsummaryrefslogtreecommitdiff
path: root/src/server/View
diff options
context:
space:
mode:
Diffstat (limited to 'src/server/View')
-rw-r--r--src/server/View/Mail/SignIn.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/server/View/Mail/SignIn.hs b/src/server/View/Mail/SignIn.hs
index 5eb181b..fc73dae 100644
--- a/src/server/View/Mail/SignIn.hs
+++ b/src/server/View/Mail/SignIn.hs
@@ -31,7 +31,7 @@ plainBody :: User -> Text -> LT.Text
plainBody user url =
LT.intercalate
"\n"
- [ strictToLazy (getVarMessage [userName user] HiMail)
+ [ strictToLazy (getParamMessage [userName user] HiMail)
, ""
, strictToLazy (getMessage SignInLinkMail)
, strictToLazy url
@@ -40,7 +40,7 @@ plainBody user url =
htmlBody :: User -> Text -> LT.Text
htmlBody user url =
renderHtml . docTypeHtml . body $ do
- toHtml $ strictToLazy (getVarMessage [userName user] HiMail)
+ toHtml $ strictToLazy (getParamMessage [userName user] HiMail)
br
br
toHtml $ strictToLazy (getMessage SignInLinkMail)