awesome/tests/test-focus.lua

--- Tests for focus signals / property.
-- Test for https://github.com/awesomeWM/awesome/issues/134.

local runner = require("_runner")
local awful = require("awful")

local beautiful = require("beautiful")
beautiful.border_normal = "#0000ff"
beautiful.border_focus  = "#00ff00"

client.connect_signal("focus", function(c)
    c.border_color = "#ff0000"
end)

local function assert_equals(a, b)
    if a == b then
        return
    end
    error(string.format("Assertion failed: %s == %s", a, b))
end


local steps = {
    -- border_color should get applied via focus signal for first client on tag.
    function(count)
        if count == 1 then
            awful.spawn("xterm")
        else
            local c = client.get()[1]
            if c then
                assert_equals(c.border_color, "#ff0000")
                return true
            end
        end
    end,

    -- border_color should get applied via focus signal for second client on tag.
    function(count)
        if count == 1 then
            awful.spawn("xterm")
        else
            if #client.get() == 2 then
                local c = client.get()[1]
                assert_equals(c, client.focus)
                if c then
                    assert_equals(c.border_color, "#ff0000")
                    return true
                end

            end
        end
    end,

    -- Test if alpha works as intended
    function()
        local c = client.get()[1]

        local function test(set, expected)
            expected = expected or set
            c.border_color = set
            assert_equals(c.border_color, expected)
        end

        test("#123456")
        test("#12345678")
        test("#123456ff", "#123456")
        return true
    end
}

runner.run_steps(steps)

-- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80