Guldoman
cf29a6a45f
When a command is performed with parameters, those are now passed to the predicate. The predicate can then return, after the validity boolean, any other value that will then be passed to the actual command. If the predicate only returns the validity boolean, the original parameters are passed through to the actual command. This allows predicates to manipulate the received parameters, and allows them to pass the result of an expensive computation to the actual command, which won't have to recalculate it. String and table predicates will now also return `core.active_view`.
64 lines
1.6 KiB
Lua
64 lines
1.6 KiB
Lua
-- mod-version:3
|
|
local core = require "core"
|
|
local command = require "core.command"
|
|
local translate = require "core.doc.translate"
|
|
|
|
|
|
local function gmatch_to_array(text, ptn)
|
|
local res = {}
|
|
for x in text:gmatch(ptn) do
|
|
table.insert(res, x)
|
|
end
|
|
return res
|
|
end
|
|
|
|
|
|
local function tabularize_lines(lines, delim)
|
|
local rows = {}
|
|
local cols = {}
|
|
|
|
-- split lines at delimiters and get maximum width of columns
|
|
local ptn = "[^" .. delim:sub(1,1):gsub("%W", "%%%1") .. "]+"
|
|
for i, line in ipairs(lines) do
|
|
rows[i] = gmatch_to_array(line, ptn)
|
|
for j, col in ipairs(rows[i]) do
|
|
cols[j] = math.max(#col, cols[j] or 0)
|
|
end
|
|
end
|
|
|
|
-- pad columns with space
|
|
for _, row in ipairs(rows) do
|
|
for i = 1, #row - 1 do
|
|
row[i] = row[i] .. string.rep(" ", cols[i] - #row[i])
|
|
end
|
|
end
|
|
|
|
-- write columns back to lines array
|
|
for i, line in ipairs(lines) do
|
|
lines[i] = table.concat(rows[i], delim)
|
|
end
|
|
end
|
|
|
|
|
|
command.add("core.docview", {
|
|
["tabularize:tabularize"] = function(dv)
|
|
core.command_view:enter("Tabularize On Delimiter", {
|
|
submit = function(delim)
|
|
if delim == "" then delim = " " end
|
|
|
|
local doc = dv.doc
|
|
local line1, col1, line2, col2, swap = doc:get_selection(true)
|
|
line1, col1 = doc:position_offset(line1, col1, translate.start_of_line)
|
|
line2, col2 = doc:position_offset(line2, col2, translate.end_of_line)
|
|
doc:set_selection(line1, col1, line2, col2, swap)
|
|
|
|
doc:replace(function(text)
|
|
local lines = gmatch_to_array(text, "[^\n]*\n?")
|
|
tabularize_lines(lines, delim)
|
|
return table.concat(lines)
|
|
end)
|
|
end
|
|
})
|
|
end,
|
|
})
|