42 lines
1.0 KiB
Lua
42 lines
1.0 KiB
Lua
local utilities = require('otouto.utilities')
|
|
|
|
local patterns = {}
|
|
|
|
patterns.command = 's/<pattern>/<substitution>'
|
|
patterns.help_word = 'sed'
|
|
patterns.doc = [[
|
|
s/<pattern>/<substitution>
|
|
Replace all matches for the given pattern.
|
|
Uses Lua patterns.
|
|
]]
|
|
|
|
function patterns:init(config)
|
|
patterns.triggers = { config.cmd_pat .. '?s/.-/.-$' }
|
|
end
|
|
|
|
function patterns:action(msg)
|
|
if not msg.reply_to_message then return true 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
|
|
utilities.send_reply(self, msg, 'Malformed pattern!')
|
|
else
|
|
output = utilities.trim(output:sub(1, 4000))
|
|
output = utilities.style.enquote('Did you mean', output)
|
|
utilities.send_reply(self, msg.reply_to_message, output, true)
|
|
end
|
|
end
|
|
|
|
return patterns
|