blob: b46250cb6a0817f67e9151fffc355eb658a47f00 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
return function (me, other)
if me == other then
return true
end
if me == '' then
return true
end
if #me > #other then
return false
end
local lMe = me:lower()
local lOther = other:lower()
if lMe == lOther:sub(1, #lMe) then
return true
end
local chars = {}
for i = 1, #lOther do
local c = lOther:sub(i, i)
chars[c] = (chars[c] or 0) + 1
end
for i = 1, #lMe do
local c = lMe:sub(i, i)
if chars[c] and chars[c] > 0 then
chars[c] = chars[c] - 1
else
return false
end
end
return true
end
|
