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`.
128 lines
3.7 KiB
Lua
128 lines
3.7 KiB
Lua
local core = require "core"
|
|
local style = require "core.style"
|
|
local DocView = require "core.docview"
|
|
local command = require "core.command"
|
|
local common = require "core.common"
|
|
local config = require "core.config"
|
|
|
|
|
|
local t = {
|
|
["root:close"] = function(node)
|
|
node:close_active_view(core.root_view.root_node)
|
|
end,
|
|
|
|
["root:close-or-quit"] = function(node)
|
|
if node and (not node:is_empty() or not node.is_primary_node) then
|
|
node:close_active_view(core.root_view.root_node)
|
|
else
|
|
core.quit()
|
|
end
|
|
end,
|
|
|
|
["root:close-all"] = function()
|
|
core.confirm_close_docs(core.docs, core.root_view.close_all_docviews, core.root_view)
|
|
end,
|
|
|
|
["root:close-all-others"] = function()
|
|
local active_doc, docs = core.active_view and core.active_view.doc, {}
|
|
for i, v in ipairs(core.docs) do if v ~= active_doc then table.insert(docs, v) end end
|
|
core.confirm_close_docs(docs, core.root_view.close_all_docviews, core.root_view, true)
|
|
end,
|
|
|
|
["root:switch-to-previous-tab"] = function(node)
|
|
local idx = node:get_view_idx(core.active_view)
|
|
idx = idx - 1
|
|
if idx < 1 then idx = #node.views end
|
|
node:set_active_view(node.views[idx])
|
|
end,
|
|
|
|
["root:switch-to-next-tab"] = function(node)
|
|
local idx = node:get_view_idx(core.active_view)
|
|
idx = idx + 1
|
|
if idx > #node.views then idx = 1 end
|
|
node:set_active_view(node.views[idx])
|
|
end,
|
|
|
|
["root:move-tab-left"] = function(node)
|
|
local idx = node:get_view_idx(core.active_view)
|
|
if idx > 1 then
|
|
table.remove(node.views, idx)
|
|
table.insert(node.views, idx - 1, core.active_view)
|
|
end
|
|
end,
|
|
|
|
["root:move-tab-right"] = function(node)
|
|
local idx = node:get_view_idx(core.active_view)
|
|
if idx < #node.views then
|
|
table.remove(node.views, idx)
|
|
table.insert(node.views, idx + 1, core.active_view)
|
|
end
|
|
end,
|
|
|
|
["root:shrink"] = function(node)
|
|
local parent = node:get_parent_node(core.root_view.root_node)
|
|
local n = (parent.a == node) and -0.1 or 0.1
|
|
parent.divider = common.clamp(parent.divider + n, 0.1, 0.9)
|
|
end,
|
|
|
|
["root:grow"] = function(node)
|
|
local parent = node:get_parent_node(core.root_view.root_node)
|
|
local n = (parent.a == node) and 0.1 or -0.1
|
|
parent.divider = common.clamp(parent.divider + n, 0.1, 0.9)
|
|
end
|
|
}
|
|
|
|
|
|
for i = 1, 9 do
|
|
t["root:switch-to-tab-" .. i] = function(node)
|
|
local view = node.views[i]
|
|
if view then
|
|
node:set_active_view(view)
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
for _, dir in ipairs { "left", "right", "up", "down" } do
|
|
t["root:split-" .. dir] = function(node)
|
|
local av = node.active_view
|
|
node:split(dir)
|
|
if av:is(DocView) then
|
|
core.root_view:open_doc(av.doc)
|
|
end
|
|
end
|
|
|
|
t["root:switch-to-" .. dir] = function(node)
|
|
local x, y
|
|
if dir == "left" or dir == "right" then
|
|
y = node.position.y + node.size.y / 2
|
|
x = node.position.x + (dir == "left" and -1 or node.size.x + style.divider_size)
|
|
else
|
|
x = node.position.x + node.size.x / 2
|
|
y = node.position.y + (dir == "up" and -1 or node.size.y + style.divider_size)
|
|
end
|
|
local node = core.root_view.root_node:get_child_overlapping_point(x, y)
|
|
local sx, sy = node:get_locked_size()
|
|
if not sx and not sy then
|
|
core.set_active_view(node.active_view)
|
|
end
|
|
end
|
|
end
|
|
|
|
command.add(function()
|
|
local node = core.root_view:get_active_node()
|
|
local sx, sy = node:get_locked_size()
|
|
return not sx and not sy, node
|
|
end, t)
|
|
|
|
command.add(nil, {
|
|
["root:scroll"] = function(delta)
|
|
local view = (core.root_view.overlapping_node and core.root_view.overlapping_node.active_view) or core.active_view
|
|
if view and view.scrollable then
|
|
view.scroll.to.y = view.scroll.to.y + delta * -config.mouse_wheel_scroll
|
|
return true
|
|
end
|
|
return false
|
|
end
|
|
})
|