awesome/tests/examples/awful/placement/next_to.lua

64 lines
2.6 KiB
Lua

--DOC_GEN_IMAGE --DOC_HIDE
local awful = { placement = require("awful.placement") }--DOC_HIDE
require("awful.tag").add("1", {screen=screen[1], selected=true}) --DOC_HIDE
screen[1]._resize {x= 0, width = 640, height=200} --DOC_HIDE
local parent_client = client.gen_fake {x = 0, y = 0, width=350, height=70} --DOC_HIDE
parent_client:_hide_all() --DOC_HIDE
awful.placement.centered(client.focus) --DOC_HIDE
parent_client:set_label("Parent client") --DOC_HIDE
for _, pos in ipairs{"left", "right", "top", "bottom"} do
for _, anchor in ipairs{"front", "middle", "back"} do
local c1 = client.gen_fake {x = 0, y = 0, width=80, height=20} --DOC_HIDE
c1:_hide_all() --DOC_HIDE
local _,p,a = --DOC_HIDE
awful.placement.next_to(
client.focus,
{
preferred_positions = pos,
preferred_anchors = anchor,
geometry = parent_client,
}
)
c1:set_label(pos.."+"..anchor) --DOC_HIDE
assert(pos == p) --DOC_HIDE
assert(anchor == a) --DOC_HIDE
--DOC_HIDE Make sure the border are correctly applied
if pos == "left" then --DOC_HIDE
assert(c1.x + c1.width + 2*c1.border_width == parent_client.x) --DOC_HIDE
end --DOC_HIDE
if pos == "right" then --DOC_HIDE
assert(c1.x == parent_client.x+parent_client.width+2*parent_client.border_width) --DOC_HIDE
end --DOC_HIDE
if pos == "top" then --DOC_HIDE
assert(c1.y + c1.height + 2*c1.border_width == parent_client.y) --DOC_HIDE
end --DOC_HIDE
if pos == "bottom" then --DOC_HIDE
assert(c1.y == parent_client.y+parent_client.height+2*parent_client.border_width)--DOC_HIDE
end --DOC_HIDE
--DOC_HIDE Make sure the "children" don't overshoot the parent geometry
if pos ~= "right" then --DOC_HIDE
assert(c1.x+c1.width+2*c1.border_width--DOC_HIDE
<= parent_client.x+parent_client.width+2*parent_client.border_width) --DOC_HIDE
end --DOC_HIDE
if pos ~= "bottom" then --DOC_HIDE
assert(c1.y+c1.height+2*c1.border_width --DOC_HIDE
<= parent_client.y+parent_client.height+2*parent_client.border_width) --DOC_HIDE
end --DOC_HIDE
if pos ~= "left" then --DOC_HIDE
assert(c1.x >= parent_client.x) --DOC_HIDE
end --DOC_HIDE
if pos ~= "top" then --DOC_HIDE
assert(c1.y >= parent_client.y) --DOC_HIDE
end --DOC_HIDE
end
end
return {hide_lines=true} --DOC_HIDE
--DOC_HIDE vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80