86 lines
2.5 KiB
Lua
86 lines
2.5 KiB
Lua
local setmetatable = setmetatable
|
|
local print = print
|
|
local color = require( "gears.color" )
|
|
local cairo = require( "lgi" ).cairo
|
|
local wibox = require( "wibox" )
|
|
local util = require( "awful.util" )
|
|
local button = require( "awful.button" )
|
|
local beautiful = require( "beautiful" )
|
|
local shape = require( "gears.shape" )
|
|
local surface = require( "gears.surface" )
|
|
local theme = require( "radical.theme" )
|
|
local rad_item = require( "radical.item" )
|
|
|
|
local module = {}
|
|
|
|
local arr_up,arr_down
|
|
local isinit = false
|
|
|
|
local function init()
|
|
if isinit then return end
|
|
|
|
arr_down = surface.load_from_shape(10, 10,
|
|
shape.transform(shape.isosceles_triangle) : scale(1, 0.5) : rotate_at(5,5, math.pi) : translate(0,5),
|
|
beautiful.fg_normal
|
|
)
|
|
arr_up = surface.load_from_shape(10, 10,
|
|
shape.transform(shape.isosceles_triangle) : scale(1, 0.5) : translate(0,5),
|
|
beautiful.fg_normal
|
|
)
|
|
|
|
isinit = true
|
|
end
|
|
|
|
function module.up()
|
|
if not isinit then
|
|
init()
|
|
end
|
|
return arr_up
|
|
end
|
|
|
|
function module.down()
|
|
if not isinit then
|
|
init()
|
|
end
|
|
return arr_down
|
|
end
|
|
|
|
local function new(data)
|
|
local scroll_w = {}
|
|
scroll_w.visible = false
|
|
for k,v in ipairs({"up","down"}) do
|
|
local ib = wibox.widget.imagebox()
|
|
ib:set_image(module[v]())
|
|
ib.fit = function(tb,context,width,height)
|
|
if scroll_w.visible == false then
|
|
return 0,0
|
|
end
|
|
return width,data.item_height
|
|
end
|
|
ib.draw = function(self, context, cr, width, height)
|
|
if width > 0 and height > 0 then
|
|
cr:set_source_surface(self._image, width/2 - self._image:get_width()/2, 0)
|
|
end
|
|
cr:paint()
|
|
end
|
|
scroll_w[v] = wibox.widget.background()
|
|
scroll_w[v]:set_widget(ib)
|
|
scroll_w[v].visible = true
|
|
data.item_style({widget=scroll_w[v]},{color=data.bg_highlight})
|
|
scroll_w[v]:connect_signal("mouse::enter",function()
|
|
--FIXME once the theme use a metatable chain, this should start working again
|
|
theme.update_colors({widget=scroll_w[v]},rad_item.item_flags.HOVER)
|
|
end)
|
|
scroll_w[v]:connect_signal("mouse::leave",function()
|
|
theme.update_colors({widget=scroll_w[v]},rad_item.item_flags.NONE)
|
|
end)
|
|
scroll_w[v]:buttons( util.table.join( button({ }, 1, function()
|
|
data["scroll_"..v](data)
|
|
end) ))
|
|
end
|
|
return scroll_w
|
|
end
|
|
|
|
return setmetatable(module, { __call = function(_, ...) return new(...) end })
|
|
-- kate: space-indent on; indent-width 2; replace-tabs on;
|