radical/item/layout/horizontal.lua

local setmetatable = setmetatable
local beautiful    = require( "beautiful"                  )
local wibox        = require( "wibox"                      )
local checkbox     = require( "radical.widgets.checkbox"   )
local fkey         = require( "radical.widgets.fkey"       )
local infoshapes   = require( "radical.widgets.infoshapes" )
local util         = require( "awful.util"                 )
local margins2     = require( "radical.margins"            )
local shape        = require( "gears.shape"                )
local surface      = require( "gears.surface"              )
local common       = require( "radical.item.common"        )

local module = {}

-- Show the checkbox
function module:setup_checked(item,data)
  if item.checkable then
    item.get_checked = function()
      if type(item._private_data.checked) == "function" then
        return item._private_data.checked(data,item)
      else
        return item._private_data.checked
      end
    end
    local ck = wibox.widget.imagebox()
    ck:set_image(item.checked and checkbox.checked() or checkbox.unchecked())
    item.set_checked = function (_,value)
      item._private_data.checked = value
      ck:set_image(item.checked and checkbox.checked() or checkbox.unchecked())
      item._internal.has_changed = true
    end
    return ck
  end
end

-- Create sub_menu arrows
local sub_arrow = nil
function module:setup_sub_menu_arrow(item,data)
  if (item._private_data.sub_menu_f or item._private_data.sub_menu_m) and not data.disable_submenu_icon then
    if not sub_arrow then
      sub_arrow = wibox.widget.imagebox() --TODO, make global
      sub_arrow.fit = function(box, context,w, h) return (sub_arrow._image and sub_arrow._image:get_width() or 0),item.height end

      if beautiful.menu_submenu_icon then
        sub_arrow:set_image( beautiful.menu_submenu_icon   )
      else
        local h = data.item_height
        sub_arrow:set_image(surface.load_from_shape(7, h,
          shape.transform(shape.isosceles_triangle) : rotate_at(3.5,h/2,math.pi/2),
          beautiful.menu_fg_normal or beautiful.menu_fg or beautiful.fg_normal
        ))
      end
    end
    return sub_arrow
  end
end

-- Create the actual widget
local function create_item(item,data,args)
    -- F keys
    common.setup_fkey(item,data)

    -- Icon
    local icon = common.setup_icon(item,data)

    if data.icon_per_state == true then --TODO create an icon widget, see item/common.lua
        item:connect_signal("state::changed",function(i,d,st)
            if item._original_icon and data.icon_transformation then
                wibox.widget.imagebox.set_image(icon,data.icon_transformation(item._original_icon,data,item))
            end
        end)
    end

    -- Define the item layout
    item.widget = wibox.widget.base.make_widget_declarative {
        -- Widgets
        {

            -- Widget
            {
                -- This is where the content is placed

                -- Widgets
                {
                    -- The prefixes

                    -- Widget
                    data.fkeys_prefix and fkey(data,item) or nil,
                    {
                        icon                                    ,
                        right  = 3                              ,
                        widget = wibox.layout.margin            ,
                    },
                    args.prefix_widget                          ,

                    -- Attributes
                    layout = wibox.layout.fixed.horizontal
                },
                {
                    -- Underlay and overlay
                    {
                        -- The main textbox
                        id            = "main_text"         ,
                        _data         = data                ,
                        _private_data = item._private_data  ,
                        text          = item.text           ,
                        widget        = wibox.widget.textbox,
                    },

                    -- Attributes
                    widget     = infoshapes,
                    spacing    = 10,
                    infoshapes = item.infoshapes,
                    id         = "infoshapes",
                },
                {
                    -- Suffixes

                    -- Widget
                    module:setup_checked(item,data)       ,
                    module:setup_sub_menu_arrow(item,data),
                    args.suffix_widget                    ,

                    -- Attributes
                    layout = wibox.layout.fixed.horizontal
                },

                -- Attributes
                _item  = item                         ,
                _data  = data                         ,
                id     = "main_align"                 ,
                layout = wibox.layout.align.horizontal,
            },

            -- Attributes
            id     = "main_margin"      ,
            layout = wibox.layout.margin,
        },

        -- Attributes
        fg      = item._private_data.fg  ,
        tooltip = item.tooltip           ,
        _item   = item                   ,
        _data   = data                   ,
        widget  = wibox.widget.background,
    }

    -- Make some widgets easier to access
    item._internal.margin_w = item.widget:get_children_by_id("main_margin")[1]
    item._internal.align    = item.widget:get_children_by_id("main_align" )[1]
    item._internal.text_w   = item.widget:get_children_by_id("main_text"  )[1]
    item._internal.icon_w   = icon

    -- Export the margin
    local mrgns = margins2(
        item._internal.margin_w,
        util.table.join(
            (item.item_style or data.item_style).margins,data.default_item_margins
        )
    )

    function item:get_margins()
        return mrgns
    end

    -- Draw
    local item_style = item.style or data.item_style
    item_style(item,{})

    -- Setup events
    common.setup_event(data,item)

    return item.widget
end

return setmetatable(module, { __call = function(_, ...) return create_item(...) end })
-- kate: space-indent on; indent-width 4; replace-tabs on;