Add friendlier and more accurate instructions in invitation email

Copy Example:

To accept the invitation:
  POST /accept-invitation username=<username>
    password=<password> email=you@domain.tld
    secret=8c6b5719-7b1c-471c-bdea-7807b6c0866c
This commit is contained in:
William Carroll 2020-08-02 18:00:29 +01:00
parent 2632dc10fd
commit a3d783025a

View file

@ -69,7 +69,7 @@ sendInviteEmail T.Config{..} email@(T.Email to) (T.InvitationSecret secretUUID)
subject = "You've been invited!"
body =
let secret = secretUUID |> UUID.toString in
cs configServer ++ "/accept-invitation?email=" ++ cs to ++ "&secret=" ++ secret
"To accept the invitation: POST /accept-invitation username=<username> password=<password> email=" ++ cs to ++ " secret=" ++ secret
server :: T.Config -> Server API
server config@T.Config{..} = createAccount