annotate src/api/change_email_1.json.luan @ 60:8b5b1bce7d6b

bcode menus
author Franklin Schmidt <fschmidt@gmail.com>
date Wed, 30 Nov 2022 23:50:52 -0700
parents 02d8876dc41d
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
1 local Luan = require "luan:Luan.luan"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
2 local error = Luan.error
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
3 local Html = require "luan:Html.luan"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
4 local url_encode = Html.url_encode or error()
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
5 local Io = require "luan:Io.luan"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
6 local output_of = Io.output_of or error()
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
7 local Http = require "luan:http/Http.luan"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
8 local Mail = require "site:/lib/Mail.luan"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
9 local Api = require "site:/api/Api.luan"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
10 local api = Api.api or error()
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
11 local user_error = Api.user_error or error()
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
12
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
13
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
14 return api(function()
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
15 local base_url = Http.request.parameters.base_url or user_error "missing base_url param"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
16 local from = Http.request.parameters.from or user_error "missing from param"
58
31c895b73bd0 improve change email
Franklin Schmidt <fschmidt@gmail.com>
parents: 57
diff changeset
17 local to = Http.request.parameters.to or user_error "missing to param"
6
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
18 local email = Http.request.parameters.email or user_error "missing email param"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
19 local password = Http.request.parameters.password or user_error "missing password param"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
20 local mailer = Mail.sender() or user_error "mail not configured"
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
21 mailer.send{
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
22 From = from
58
31c895b73bd0 improve change email
Franklin Schmidt <fschmidt@gmail.com>
parents: 57
diff changeset
23 To = to
57
169ac5fdb320 add change email
Franklin Schmidt <fschmidt@gmail.com>
parents: 54
diff changeset
24 Subject = "Change Email"
6
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
25 body = output_of(function() %>
58
31c895b73bd0 improve change email
Franklin Schmidt <fschmidt@gmail.com>
parents: 57
diff changeset
26 Change your email address to <%=email%> by clicking this link:
54
260abd8f8565 login and register
Franklin Schmidt <fschmidt@gmail.com>
parents: 6
diff changeset
27
59
02d8876dc41d improve change email
Franklin Schmidt <fschmidt@gmail.com>
parents: 58
diff changeset
28 <%=base_url%>/change_email.html?email=<%=url_encode(email)%>&password=<%=password%>
58
31c895b73bd0 improve change email
Franklin Schmidt <fschmidt@gmail.com>
parents: 57
diff changeset
29
31c895b73bd0 improve change email
Franklin Schmidt <fschmidt@gmail.com>
parents: 57
diff changeset
30 If you don't want to change your email address, then don't click on the link.
6
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
31 <% end)
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
32 }
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
33 return {
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
34 okay = true
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
35 }
9166f6a14021 add email api
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
36 end)