Mercurial Hosting > linkmystyle
comparison unsubscribe/src/unsubscribe.html.luan @ 0:8f4df159f06b
start public repo
| author | Franklin Schmidt <fschmidt@gmail.com> |
|---|---|
| date | Fri, 11 Jul 2025 20:57:49 -0600 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| -1:000000000000 | 0:8f4df159f06b |
|---|---|
| 1 local Luan = require "luan:Luan.luan" | |
| 2 local error = Luan.error | |
| 3 local Io = require "luan:Io.luan" | |
| 4 local Http = require "luan:http/Http.luan" | |
| 5 local Shared = require "site:/lib/Shared.luan" | |
| 6 local head = Shared.head or error() | |
| 7 local header = Shared.header or error() | |
| 8 local footer = Shared.footer or error() | |
| 9 local validate_email = Shared.validate_email or error() | |
| 10 local Db = require "site:/lib/Db.luan" | |
| 11 | |
| 12 | |
| 13 return function() | |
| 14 local email = Http.request.parameters.email or error() | |
| 15 validate_email(email) | |
| 16 Db.run_in_transaction( function() | |
| 17 Db.delete("unsubscribe_email:"..email) | |
| 18 Db.save{ | |
| 19 type = "unsubscribe" | |
| 20 unsubscribe_email = email | |
| 21 } | |
| 22 end ) | |
| 23 Io.stdout = Http.response.text_writer() | |
| 24 %> | |
| 25 <!doctype html> | |
| 26 <html lang="en"> | |
| 27 <head> | |
| 28 <% head() %> | |
| 29 <title>Link My Style</title> | |
| 30 </head> | |
| 31 <body> | |
| 32 <% header() %> | |
| 33 <div content> | |
| 34 <h1>Unsubscribed</h1> | |
| 35 <p><%=email%> has been unsubscribed from linkmy.style .</p> | |
| 36 <p>Unsubscribed by mistake? <a href="subscribe.html?email=<%=email%>">Subscribe</a></p> | |
| 37 </div> | |
| 38 <% footer() %> | |
| 39 </body> | |
| 40 </html> | |
| 41 <% | |
| 42 end |