Mercurial Hosting > chat

comparison src/do_login.html.luan @ 83:a47036fd0158

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
group chat
author Franklin Schmidt <fschmidt@gmail.com>
date Tue, 11 Mar 2025 13:56:59 -0600
parents 8270106644db
children 3053a4fc10be
comparison
equal deleted inserted replaced
82:0bc5e0d098f7 83:a47036fd0158
1 local Luan = require "luan:Luan.luan" 1 local Luan = require "luan:Luan.luan"
2 local error = Luan.error 2 local error = Luan.error
3 local ipairs = Luan.ipairs or error() 3 local ipairs = Luan.ipairs or error()
4 local Table = require "luan:Table.luan" 4 local Table = require "luan:Table.luan"
5 local concat = Table.concat or error() 5 local concat = Table.concat or error()
6 local Html = require "luan:Html.luan"
7 local url_encode = Html.url_encode or error()
6 local Io = require "luan:Io.luan" 8 local Io = require "luan:Io.luan"
7 local Http = require "luan:http/Http.luan" 9 local Http = require "luan:http/Http.luan"
8 local Shared = require "site:/lib/Shared.luan" 10 local Shared = require "site:/lib/Shared.luan"
9 local head = Shared.head or error() 11 local head = Shared.head or error()
10 local header = Shared.header or error() 12 local header = Shared.header or error()
39 location = "/" 41 location = "/"
40 else 42 else
41 with = to_list(with) 43 with = to_list(with)
42 local t = {} 44 local t = {}
43 for _, email in ipairs(with) do 45 for _, email in ipairs(with) do
44 t[#t+1] = "with="..email 46 t[#t+1] = "with="..url_encode(email)
45 end 47 end
46 location = "/chat?"..concat(t,"&") 48 location = "/chat?"..concat(t,"&")
47 end 49 end
48 %> 50 %>
49 <script> location = '<%=location%>'; </script> 51 <script> location = '<%=location%>'; </script>