728 lines
19 KiB
Lua
728 lines
19 KiB
Lua
-------------------------------------------------------------------------
|
||
--- Tooltip module for awesome objects.
|
||
--
|
||
-- A tooltip is a small hint displayed when the mouse cursor
|
||
-- hovers over a specific item.
|
||
-- In awesome, a tooltip can be linked with almost any
|
||
-- object having a `:connect_signal()` method and receiving
|
||
-- `mouse::enter` and `mouse::leave` signals.
|
||
--
|
||
-- How to create a tooltip?
|
||
-- ---
|
||
--
|
||
-- @DOC_awful_tooltip_textclock_EXAMPLE@
|
||
--
|
||
-- Alternatively, you can use `mouse::enter` signal:
|
||
--
|
||
-- @DOC_awful_tooltip_textclock2_EXAMPLE@
|
||
--
|
||
-- How to create a tooltip without objects?
|
||
-- ---
|
||
--
|
||
-- @DOC_awful_tooltip_mouse_EXAMPLE@
|
||
--
|
||
-- How to add the same tooltip to multiple objects?
|
||
-- ---
|
||
--
|
||
-- myclock_t:add_to_object(obj1)
|
||
-- myclock_t:add_to_object(obj2)
|
||
--
|
||
-- Now the same tooltip is attached to `myclock`, `obj1`, `obj2`.
|
||
--
|
||
-- How to remove a tooltip from several objects?
|
||
-- ---
|
||
--
|
||
-- myclock_t:remove_from_object(obj1)
|
||
-- myclock_t:remove_from_object(obj2)
|
||
--
|
||
-- Now the same tooltip is only attached to `myclock`.
|
||
--
|
||
-- @author Sébastien Gross <seb•ɱɩɲʋʃ•awesome•ɑƬ•chezwam•ɖɵʈ•org>
|
||
-- @copyright 2009 Sébastien Gross
|
||
-- @popupmod awful.tooltip
|
||
-------------------------------------------------------------------------
|
||
|
||
local timer = require("gears.timer")
|
||
local gtable = require("gears.table")
|
||
local object = require("gears.object")
|
||
local color = require("gears.color")
|
||
local wibox = require("wibox")
|
||
local a_placement = require("awful.placement")
|
||
local a_button = require("awful.button")
|
||
local shape = require("gears.shape")
|
||
local beautiful = require("beautiful")
|
||
local dpi = require("beautiful").xresources.apply_dpi
|
||
local setmetatable = setmetatable
|
||
local ipairs = ipairs
|
||
local capi = {mouse=mouse, awesome=awesome}
|
||
|
||
local tooltip = { mt = {} }
|
||
|
||
-- The mouse point is 1x1, so anything aligned based on it as parent
|
||
-- geometry will go out of bound. To get the desired placement, it is
|
||
-- necessary to swap left with right and top with bottom
|
||
local align_convert = {
|
||
top_left = "bottom_right",
|
||
left = "right",
|
||
bottom_left = "top_right",
|
||
right = "left",
|
||
top_right = "bottom_left",
|
||
bottom_right = "top_left",
|
||
top = "bottom",
|
||
bottom = "top",
|
||
}
|
||
|
||
-- If the wibox is under the cursor, it will trigger a mouse::leave
|
||
local offset = {
|
||
top_left = {x = 0, y = 0 },
|
||
left = {x = 0, y = 0 },
|
||
bottom_left = {x = 0, y = 0 },
|
||
right = {x = 1, y = 0 },
|
||
top_right = {x = 0, y = 0 },
|
||
bottom_right = {x = 1, y = 1 },
|
||
top = {x = 0, y = 0 },
|
||
bottom = {x = 0, y = 1 },
|
||
}
|
||
|
||
--- The tooltip border color.
|
||
-- @beautiful beautiful.tooltip_border_color
|
||
|
||
--- The tooltip background color.
|
||
-- @beautiful beautiful.tooltip_bg
|
||
|
||
--- The tooltip foregound (text) color.
|
||
-- @beautiful beautiful.tooltip_fg
|
||
|
||
--- The tooltip font.
|
||
-- @beautiful beautiful.tooltip_font
|
||
|
||
--- The tooltip border width.
|
||
-- @beautiful beautiful.tooltip_border_width
|
||
|
||
--- The tooltip opacity.
|
||
-- @beautiful beautiful.tooltip_opacity
|
||
|
||
--- The default tooltip shape.
|
||
-- The default shape for all tooltips is a rectangle. However, by setting this variable
|
||
-- they can default to rounded rectangle or stretched octogons.
|
||
-- @beautiful beautiful.tooltip_shape
|
||
-- @tparam[opt=gears.shape.rectangle] function shape A `gears.shape` compatible function
|
||
-- @see shape
|
||
-- @see gears.shape
|
||
|
||
local function apply_mouse_mode(self)
|
||
local w = self:get_wibox()
|
||
local align = self._private.align
|
||
local real_placement = align_convert[align]
|
||
|
||
a_placement[real_placement](w, {
|
||
parent = capi.mouse,
|
||
offset = offset[align]
|
||
})
|
||
end
|
||
|
||
local function apply_outside_mode(self)
|
||
local w = self:get_wibox()
|
||
|
||
local _, position = a_placement.next_to(w, {
|
||
geometry = self._private.widget_geometry,
|
||
preferred_positions = self.preferred_positions,
|
||
preferred_anchors = self.preferred_alignments,
|
||
honor_workarea = true,
|
||
})
|
||
|
||
self.current_position = position
|
||
end
|
||
|
||
-- Place the tooltip under the mouse.
|
||
--
|
||
-- @tparam tooltip self A tooltip object.
|
||
local function set_geometry(self)
|
||
-- calculate width / height
|
||
local n_w, n_h = self.textbox:get_preferred_size(capi.mouse.screen)
|
||
n_w = n_w + self.marginbox.left + self.marginbox.right
|
||
n_h = n_h + self.marginbox.top + self.marginbox.bottom
|
||
|
||
local w = self:get_wibox()
|
||
w:geometry({ width = n_w, height = n_h })
|
||
|
||
local mode = self.mode
|
||
|
||
if mode == "outside" and self._private.widget_geometry then
|
||
apply_outside_mode(self)
|
||
else
|
||
apply_mouse_mode(self)
|
||
end
|
||
|
||
a_placement.no_offscreen(w)
|
||
end
|
||
|
||
-- Show a tooltip.
|
||
--
|
||
-- @tparam tooltip self The tooltip to show.
|
||
local function show(self)
|
||
-- do nothing if the tooltip is already shown
|
||
if self._private.visible then return end
|
||
if self.timer then
|
||
if not self.timer.started then
|
||
self:timer_function()
|
||
self.timer:start()
|
||
end
|
||
end
|
||
set_geometry(self)
|
||
self.wibox.visible = true
|
||
self._private.visible = true
|
||
self:emit_signal("property::visible")
|
||
end
|
||
|
||
-- Hide a tooltip.
|
||
--
|
||
-- @tparam tooltip self The tooltip to hide.
|
||
local function hide(self)
|
||
-- do nothing if the tooltip is already hidden
|
||
if not self._private.visible then return end
|
||
if self.timer then
|
||
if self.timer.started then
|
||
self.timer:stop()
|
||
end
|
||
end
|
||
self.wibox.visible = false
|
||
self._private.visible = false
|
||
self:emit_signal("property::visible")
|
||
end
|
||
|
||
--- The wibox containing the tooltip widgets.
|
||
-- @property wibox
|
||
-- @param `wibox`
|
||
|
||
function tooltip:get_wibox()
|
||
if self._private.wibox then
|
||
return self._private.wibox
|
||
end
|
||
|
||
local wb = wibox(self.wibox_properties)
|
||
wb:set_widget(self.widget)
|
||
|
||
-- Close the tooltip when clicking it. This gets done on release, to not
|
||
-- emit the release event on an underlying object, e.g. the titlebar icon.
|
||
wb:buttons(a_button({}, 1, nil, self.hide))
|
||
|
||
self._private.wibox = wb
|
||
|
||
return wb
|
||
end
|
||
|
||
--- Is the tooltip visible?
|
||
-- @property visible
|
||
-- @param boolean
|
||
|
||
function tooltip:get_visible()
|
||
return self._private.visible
|
||
end
|
||
|
||
function tooltip:set_visible(value)
|
||
if self._private.visible == value then return end
|
||
|
||
if value then
|
||
show(self)
|
||
else
|
||
hide(self)
|
||
end
|
||
end
|
||
|
||
--- The horizontal alignment.
|
||
--
|
||
-- This is valid for the mouse mode only. For the outside mode, use
|
||
-- `preferred_positions`.
|
||
--
|
||
-- @DOC_awful_tooltip_align_EXAMPLE@
|
||
--
|
||
-- @DOC_awful_tooltip_align2_EXAMPLE@
|
||
--
|
||
-- The following values are valid:
|
||
--
|
||
-- * top_left
|
||
-- * left
|
||
-- * bottom_left
|
||
-- * right
|
||
-- * top_right
|
||
-- * bottom_right
|
||
-- * bottom
|
||
-- * top
|
||
--
|
||
-- @property align
|
||
-- @see beautiful.tooltip_align
|
||
-- @see mode
|
||
-- @see preferred_positions
|
||
|
||
--- The default tooltip alignment.
|
||
-- @beautiful beautiful.tooltip_align
|
||
-- @param string
|
||
-- @see align
|
||
|
||
function tooltip:get_align()
|
||
return self._private.align
|
||
end
|
||
|
||
function tooltip:set_align(value)
|
||
if not align_convert[value] then
|
||
return
|
||
end
|
||
|
||
self._private.align = value
|
||
|
||
set_geometry(self)
|
||
self:emit_signal("property::align")
|
||
end
|
||
|
||
--- The shape of the tooltip window.
|
||
-- If the shape require some parameters, use `set_shape`.
|
||
--
|
||
-- @DOC_awful_tooltip_shape_EXAMPLE@
|
||
--
|
||
-- @property shape
|
||
-- @see gears.shape
|
||
-- @see set_shape
|
||
-- @see beautiful.tooltip_shape
|
||
|
||
--- Set the tooltip shape.
|
||
-- All other arguments will be passed to the shape function.
|
||
-- @tparam gears.shape s The shape
|
||
-- @see shape
|
||
-- @see gears.shape
|
||
function tooltip:set_shape(s)
|
||
self.backgroundbox:set_shape(s)
|
||
end
|
||
|
||
--- Set the tooltip positioning mode.
|
||
-- This affects how the tooltip is placed. By default, the tooltip is `align`ed
|
||
-- close to the mouse cursor. It is also possible to place the tooltip relative
|
||
-- to the widget geometry.
|
||
--
|
||
-- **mouse:**
|
||
--
|
||
-- @DOC_awful_tooltip_mode_EXAMPLE@
|
||
--
|
||
-- **outside:**
|
||
--
|
||
-- @DOC_awful_tooltip_mode2_EXAMPLE@
|
||
--
|
||
-- Valid modes are:
|
||
--
|
||
-- * "mouse": Next to the mouse cursor
|
||
-- * "outside": Outside of the widget
|
||
--
|
||
-- @property mode
|
||
-- @param string
|
||
|
||
function tooltip:set_mode(mode)
|
||
self._private.mode = mode
|
||
|
||
set_geometry(self)
|
||
self:emit_signal("property::mode")
|
||
end
|
||
|
||
function tooltip:get_mode()
|
||
return self._private.mode or "mouse"
|
||
end
|
||
|
||
--- The preferred positions when in `outside` mode.
|
||
--
|
||
-- @DOC_awful_tooltip_preferred_positions_EXAMPLE@
|
||
--
|
||
-- If the tooltip fits on multiple sides of the drawable, then this defines the
|
||
-- priority.
|
||
--
|
||
-- The valid table values are:
|
||
--
|
||
-- * "top"
|
||
-- * "right"
|
||
-- * "left"
|
||
-- * "bottom"
|
||
--
|
||
-- The default is:
|
||
--
|
||
-- {"top", "right", "left", "bottom"}
|
||
--
|
||
-- @property preferred_positions
|
||
-- @tparam table preferred_positions The position, ordered by priorities
|
||
-- @see align
|
||
-- @see mode
|
||
-- @see preferred_alignments
|
||
|
||
function tooltip:get_preferred_positions()
|
||
return self._private.preferred_positions or
|
||
{"top", "right", "left", "bottom"}
|
||
end
|
||
|
||
function tooltip:set_preferred_positions(value)
|
||
self._private.preferred_positions = value
|
||
|
||
set_geometry(self)
|
||
end
|
||
|
||
--- The preferred alignment when using the `outside` mode.
|
||
--
|
||
-- The values of the table are ordered by priority, the first one that fits
|
||
-- will be used.
|
||
--
|
||
-- **front:**
|
||
--
|
||
-- @DOC_awful_tooltip_preferred_alignment_EXAMPLE@
|
||
--
|
||
-- **middle:**
|
||
--
|
||
-- @DOC_awful_tooltip_preferred_alignment2_EXAMPLE@
|
||
--
|
||
-- **back:**
|
||
--
|
||
-- @DOC_awful_tooltip_preferred_alignment3_EXAMPLE@
|
||
--
|
||
-- The valid table values are:
|
||
--
|
||
-- * front
|
||
-- * middle
|
||
-- * back
|
||
--
|
||
-- The default is:
|
||
--
|
||
-- {"front", "back", "middle"}
|
||
--
|
||
-- @property preferred_alignments
|
||
-- @param string
|
||
-- @see preferred_positions
|
||
|
||
function tooltip:get_preferred_alignments()
|
||
return self._private.preferred_alignments or
|
||
{"front", "back", "middle"}
|
||
end
|
||
|
||
function tooltip:set_preferred_alignments(value)
|
||
self._private.preferred_alignments = value
|
||
|
||
set_geometry(self)
|
||
end
|
||
|
||
--- Change displayed text.
|
||
--
|
||
-- @property text
|
||
-- @tparam tooltip self The tooltip object.
|
||
-- @tparam string text New tooltip text, passed to
|
||
-- `wibox.widget.textbox.set_text`.
|
||
-- @see wibox.widget.textbox
|
||
|
||
function tooltip:set_text(text)
|
||
self.textbox:set_text(text)
|
||
if self._private.visible then
|
||
set_geometry(self)
|
||
end
|
||
end
|
||
|
||
--- Change displayed markup.
|
||
--
|
||
-- @property markup
|
||
-- @tparam tooltip self The tooltip object.
|
||
-- @tparam string text New tooltip markup, passed to
|
||
-- `wibox.widget.textbox.set_markup`.
|
||
-- @see wibox.widget.textbox
|
||
|
||
function tooltip:set_markup(text)
|
||
self.textbox:set_markup(text)
|
||
if self._private.visible then
|
||
set_geometry(self)
|
||
end
|
||
end
|
||
|
||
--- Change the tooltip's update interval.
|
||
--
|
||
-- @property timeout
|
||
-- @tparam tooltip self A tooltip object.
|
||
-- @tparam number timeout The timeout value.
|
||
|
||
function tooltip:set_timeout(timeout)
|
||
if self.timer then
|
||
self.timer.timeout = timeout
|
||
end
|
||
end
|
||
|
||
--- Set all margins around the tooltip textbox
|
||
--
|
||
-- @DOC_awful_tooltip_margins_EXAMPLE@
|
||
--
|
||
-- @property margins
|
||
-- @tparam tooltip self A tooltip object
|
||
-- @tparam number New margins value
|
||
|
||
function tooltip:set_margins(val)
|
||
self.marginbox:set_margins(val)
|
||
end
|
||
|
||
--- The border width.
|
||
--
|
||
-- @DOC_awful_tooltip_border_width_EXAMPLE@
|
||
--
|
||
-- @property border_width
|
||
-- @param number
|
||
|
||
function tooltip:set_border_width(val)
|
||
self.widget.border_width = val
|
||
end
|
||
|
||
--- The border color.
|
||
--
|
||
-- @DOC_awful_tooltip_border_color_EXAMPLE@
|
||
--
|
||
-- @property border_color
|
||
-- @param gears.color
|
||
|
||
function tooltip:set_border_color(val)
|
||
self.widget.border_color = val
|
||
end
|
||
|
||
--- Set the margins around the left and right of the tooltip textbox
|
||
--
|
||
-- @DOC_awful_tooltip_margins_leftright_EXAMPLE@
|
||
--
|
||
-- @property margins_leftright
|
||
-- @tparam tooltip self A tooltip object
|
||
-- @tparam number New margins value
|
||
|
||
function tooltip:set_margin_leftright(val)
|
||
self.marginbox:set_left(val)
|
||
self.marginbox:set_right(val)
|
||
end
|
||
|
||
--TODO v5 deprecate this
|
||
function tooltip:set_margins_leftright(val)
|
||
self:set_margin_leftright(val)
|
||
end
|
||
|
||
--- Set the margins around the top and bottom of the tooltip textbox
|
||
--
|
||
-- @DOC_awful_tooltip_margins_topbottom_EXAMPLE@
|
||
--
|
||
-- @property margins_topbottom
|
||
-- @tparam tooltip self A tooltip object
|
||
-- @tparam number New margins value
|
||
|
||
function tooltip:set_margin_topbottom(val)
|
||
self.marginbox:set_top(val)
|
||
self.marginbox:set_bottom(val)
|
||
end
|
||
|
||
--TODO v5 deprecate this
|
||
function tooltip:set_margins_topbottom(val)
|
||
self:set_margin_topbottom(val)
|
||
end
|
||
|
||
--- Add tooltip to an object.
|
||
--
|
||
-- @tparam tooltip self The tooltip.
|
||
-- @tparam gears.object obj An object with `mouse::enter` and
|
||
-- `mouse::leave` signals.
|
||
-- @function add_to_object
|
||
function tooltip:add_to_object(obj)
|
||
if not obj then return end
|
||
|
||
obj:connect_signal("mouse::enter", self.show)
|
||
obj:connect_signal("mouse::leave", self.hide)
|
||
end
|
||
|
||
--- Remove tooltip from an object.
|
||
--
|
||
-- @tparam tooltip self The tooltip.
|
||
-- @tparam gears.object obj An object with `mouse::enter` and
|
||
-- `mouse::leave` signals.
|
||
-- @function remove_from_object
|
||
function tooltip:remove_from_object(obj)
|
||
obj:disconnect_signal("mouse::enter", self.show)
|
||
obj:disconnect_signal("mouse::leave", self.hide)
|
||
end
|
||
|
||
-- Tooltip can be applied to both widgets, wibox and client, their geometry
|
||
-- works differently.
|
||
|
||
local function get_parent_geometry(arg1, arg2)
|
||
if type(arg2) == "table" and arg2.width then
|
||
return arg2
|
||
elseif type(arg1) == "table" and arg1.width then
|
||
return arg1
|
||
end
|
||
end
|
||
|
||
--- Create a new tooltip and link it to a widget.
|
||
-- Tooltips emit `property::visible` when their visibility changes.
|
||
-- @tparam table args Arguments for tooltip creation.
|
||
-- @tparam function args.timer_function A function to dynamically set the
|
||
-- tooltip text. Its return value will be passed to
|
||
-- `wibox.widget.textbox.set_markup`.
|
||
-- @tparam[opt=1] number args.timeout The timeout value for
|
||
-- `timer_function`.
|
||
-- @tparam[opt] table args.objects A list of objects linked to the tooltip.
|
||
-- @tparam[opt] number args.delay_show Delay showing the tooltip by this many
|
||
-- seconds.
|
||
-- @tparam[opt=apply_dpi(5)] integer args.margin_leftright The left/right margin for the text.
|
||
-- @tparam[opt=apply_dpi(3)] integer args.margin_topbottom The top/bottom margin for the text.
|
||
-- @tparam[opt=nil] gears.shape args.shape The shape
|
||
-- @tparam[opt] string args.bg The background color
|
||
-- @tparam[opt] string args.fg The foreground color
|
||
-- @tparam[opt] string args.border_color The tooltip border color
|
||
-- @tparam[opt] number args.border_width The tooltip border width
|
||
-- @tparam[opt] string args.align The horizontal alignment
|
||
-- @tparam[opt] string args.font The tooltip font
|
||
-- @tparam[opt] number args.opacity The tooltip opacity
|
||
-- @treturn awful.tooltip The created tooltip.
|
||
-- @see add_to_object
|
||
-- @see timeout
|
||
-- @see text
|
||
-- @see markup
|
||
-- @see align
|
||
-- @function awful.tooltip
|
||
function tooltip.new(args)
|
||
-- gears.object, properties are linked to set_/get_ functions
|
||
local self = object {
|
||
enable_properties = true,
|
||
}
|
||
|
||
rawset(self,"_private", {})
|
||
|
||
self._private.visible = false
|
||
self._private.align = args.align or beautiful.tooltip_align or "right"
|
||
self._private.shape = args.shape or beautiful.tooltip_shape
|
||
or shape.rectangle
|
||
|
||
-- private data
|
||
if args.delay_show then
|
||
local delay_timeout
|
||
|
||
delay_timeout = timer { timeout = args.delay_show }
|
||
delay_timeout:connect_signal("timeout", function ()
|
||
show(self)
|
||
delay_timeout:stop()
|
||
end)
|
||
|
||
function self.show(other, geo)
|
||
-- Auto detect clients and wiboxes
|
||
if other.drawable or other.pid then
|
||
geo = other:geometry()
|
||
end
|
||
|
||
-- Cache the geometry in case it is needed later
|
||
self._private.widget_geometry = get_parent_geometry(other, geo)
|
||
|
||
if not delay_timeout.started then
|
||
delay_timeout:start()
|
||
end
|
||
end
|
||
function self.hide()
|
||
if delay_timeout.started then
|
||
delay_timeout:stop()
|
||
end
|
||
hide(self)
|
||
end
|
||
else
|
||
function self.show(other, geo)
|
||
-- Auto detect clients and wiboxes
|
||
if other.drawable or other.pid then
|
||
geo = other
|
||
end
|
||
|
||
-- Cache the geometry in case it is needed later
|
||
self._private.widget_geometry = get_parent_geometry(other, geo)
|
||
|
||
show(self)
|
||
end
|
||
function self.hide()
|
||
hide(self)
|
||
end
|
||
end
|
||
|
||
-- export functions
|
||
gtable.crush(self, tooltip, true)
|
||
|
||
-- setup the timer action only if needed
|
||
if args.timer_function then
|
||
self.timer = timer { timeout = args.timeout and args.timeout or 1 }
|
||
self.timer_function = function()
|
||
self:set_markup(args.timer_function())
|
||
end
|
||
self.timer:connect_signal("timeout", self.timer_function)
|
||
end
|
||
|
||
-- collect tooltip properties
|
||
-- wibox
|
||
local fg = args.fg or beautiful.tooltip_fg or beautiful.fg_focus or "#000000"
|
||
local opacity = args.opacity or beautiful.tooltip_opacity or 1
|
||
-- textbox
|
||
local font = args.font or beautiful.tooltip_font or beautiful.font
|
||
-- marginbox
|
||
local m_lr = args.margin_leftright or dpi(5)
|
||
local m_tb = args.margin_topbottom or dpi(3)
|
||
-- backgroundbox
|
||
local bg = args.bg or beautiful.tooltip_bg
|
||
or beautiful.bg_focus or "#ffcb60"
|
||
local border_width = args.border_width or beautiful.tooltip_border_width or 0
|
||
local border_color = args.border_color or beautiful.tooltip_border_color
|
||
or beautiful.border_normal or "#ffcb60"
|
||
|
||
-- Set wibox default properties
|
||
self.wibox_properties = {
|
||
visible = false,
|
||
ontop = true,
|
||
border_width = 0,
|
||
fg = fg,
|
||
bg = color.transparent,
|
||
opacity = opacity,
|
||
type = "tooltip",
|
||
}
|
||
|
||
self.widget = wibox.widget {
|
||
{
|
||
{
|
||
id = 'text_role',
|
||
font = font,
|
||
widget = wibox.widget.textbox,
|
||
},
|
||
id = 'margin_role',
|
||
left = m_lr,
|
||
right = m_lr,
|
||
top = m_tb,
|
||
bottom = m_tb,
|
||
widget = wibox.container.margin,
|
||
},
|
||
id = 'background_role',
|
||
bg = bg,
|
||
shape = self._private.shape,
|
||
border_width = border_width,
|
||
border_color = border_color,
|
||
widget = wibox.container.background,
|
||
}
|
||
self.textbox = self.widget:get_children_by_id('text_role')[1]
|
||
self.marginbox = self.widget:get_children_by_id('margin_role')[1]
|
||
self.backgroundbox = self.widget:get_children_by_id('background_role')[1]
|
||
|
||
-- Add tooltip to objects
|
||
if args.objects then
|
||
for _, obj in ipairs(args.objects) do
|
||
self:add_to_object(obj)
|
||
end
|
||
end
|
||
|
||
-- Apply the properties
|
||
for k, v in pairs(args) do
|
||
if tooltip["set_"..k] then
|
||
self[k] = v
|
||
end
|
||
end
|
||
|
||
return self
|
||
end
|
||
|
||
function tooltip.mt:__call(...)
|
||
return tooltip.new(...)
|
||
end
|
||
|
||
return setmetatable(tooltip, tooltip.mt)
|
||
|
||
-- vim: filetype=lua:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:textwidth=80
|