35 lines
798 B
Lua
35 lines
798 B
Lua
local patterns = {}
|
|
|
|
local utilities = require('otouto.utilities')
|
|
|
|
patterns.triggers = {
|
|
'^/?s/.-/.-$'
|
|
}
|
|
|
|
function patterns:action(msg)
|
|
if not msg.reply_to_message then return end
|
|
local output = msg.reply_to_message.text
|
|
if msg.reply_to_message.from.id == self.info.id then
|
|
output = output:gsub('Did you mean:\n"', '')
|
|
output = output:gsub('"$', '')
|
|
end
|
|
local m1, m2 = msg.text:match('^/?s/(.-)/(.-)/?$')
|
|
if not m2 then return true end
|
|
local res
|
|
res, output = pcall(
|
|
function()
|
|
return output:gsub(m1, m2)
|
|
end
|
|
)
|
|
if res == false then
|
|
output = 'Malformed pattern!'
|
|
utilities.send_reply(self, msg, output)
|
|
else
|
|
output = output:sub(1, 4000)
|
|
output = 'Did you mean:\n"' .. output .. '"'
|
|
utilities.send_reply(self, msg.reply_to_message, output)
|
|
end
|
|
end
|
|
|
|
return patterns
|