annotate src/lib/Utils.luan @ 28:99b71a377f2c

audio for textarea
author Franklin Schmidt <fschmidt@gmail.com>
date Sat, 02 Aug 2025 20:04:35 -0600
parents f5425a3c1898
children d34d709a7a8e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
1 local Luan = require "luan:Luan.luan"
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
2 local error = Luan.error
9
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
3 local pairs = Luan.pairs or error()
2
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
4 local Http = require "luan:http/Http.luan"
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
5
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
6
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
7 local Utils = {}
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
8
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
9 function Utils.base_url()
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
10 local request = Http.request
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
11 return request.scheme.."://"..request.headers["Host"]
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
12 end
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
13
9
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
14 function Utils.shallow_copy(t)
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
15 local rtn = {}
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
16 for key, val in pairs(t) do
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
17 rtn[key] = val
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
18 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
19 return rtn
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
20 end
Franklin Schmidt <fschmidt@gmail.com>
parents: 2
diff changeset
21
16
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
22 function Utils.get_first(t)
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
23 return pairs(t)()
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
24 end
f5425a3c1898 add languages
Franklin Schmidt <fschmidt@gmail.com>
parents: 9
diff changeset
25
2
78708fa556a0 add login
Franklin Schmidt <fschmidt@gmail.com>
parents:
diff changeset
26 return Utils