Fix columnlistarea scroll wheel detection

This commit is contained in:
Kenny Shields 2014-08-23 15:58:44 -04:00
parent 8fb82f7d7a
commit c159ae7828

View File

@ -164,8 +164,16 @@ function newobject:mousepressed(x, y, button)
end
end
if self.bar and self:IsTopList() then
local bar = self:GetScrollBar()
local bar = false
if self.vbar and self.hbar then
bar = self:GetVerticalScrollBody():GetScrollBar()
elseif self.vbar and not self.hbar then
bar = self:GetVerticalScrollBody():GetScrollBar()
elseif not self.var and self.hbar then
bar = self:GetHorizontalScrollBody():GetScrollBar()
end
if self:IsTopList() and bar then
if self.dtscrolling then
local dt = love.timer.getDelta()
if button == "wu" then