24 lines
789 B
Lua
24 lines
789 B
Lua
|
local setmetatable = setmetatable
|
||
|
|
local context = require("radical.context")
|
||
|
|
local base = require("radical.base")
|
||
|
|
local capi = { mouse = mouse, screen = screen }
|
||
|
|
|
||
|
|
local function set_position(data)
|
||
|
|
local s = data.screen or capi.mouse.screen
|
||
|
|
local geom = capi.screen[s].geometry
|
||
|
|
data.wibox.x = geom.x + (geom.width/2) - data.width/2
|
||
|
|
data.wibox.y = geom.y + (geom.height/2) - data.height/2
|
||
|
|
end
|
||
|
|
|
||
|
|
local function new(args)
|
||
|
|
local args = args or {}
|
||
|
|
args.internal = args.internal or {}
|
||
|
|
args.arrow_type = base.arrow_type.NONE
|
||
|
|
args.internal.set_position = args.internal.set_position or set_position
|
||
|
|
local ret = context(args)
|
||
|
|
return ret
|
||
|
|
end
|
||
|
|
|
||
|
|
return setmetatable({}, { __call = function(_, ...) return new(...) end })
|
||
|
|
-- kate: space-indent on; indent-width 2; replace-tabs on;
|