len0rd/suit
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Externalize widget hit test to style definition.

Browse source
This commit is contained in:
Matthias Richter 2012-03-14 16:19:46 +01:00
parent 2e5927e963
commit 6de65888dc
7 changed files with 18 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

4
slider.lua
View file

@ -1,6 +1,6 @@
local core = require((...):match("(.-)[^%.]+$") .. 'core')
return function(info, x,y,w,h, draw)
return function(info, x,y,w,h, widgetHit, draw)
assert(type(info) == 'table' and info.value, "Incomplete slider value info")
info.min = info.min or 0
info.max = info.max or math.max(info.value, 1)
@ -8,7 +8,7 @@ return function(info, x,y,w,h, draw)
local fraction = (info.value - info.min) / (info.max - info.min)
local id = core.generateID()
core.mouse.updateState(id, x,y,w,h)
core.mouse.updateState(id, widgetHit or core.style.widgetHit, x,y,w,h)
core.makeCyclable(id)
core.registerDraw(id,draw or core.style.Slider, fraction, x,y,w,h, info.vertical)