library-mirrors/LoveFrames
1
0
Fork 0
mirror of https://github.com/linux-man/LoveFrames.git synced 2024-11-18 16:04:22 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix bug that would cause tabbuttons to be positioned incorrectly when scrolling with the mouse wheel

Browse Source
This commit is contained in:
Kenny Shields 2014-05-26 00:54:15 -04:00
parent 1764333ae4
commit 0472742468
1 changed files with 9 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
objects/tabs.lua
View File

@ -239,9 +239,6 @@ function newobject:mousepressed(x, y, button)
local visible = internals[numinternals]:GetVisible() local visible = internals[numinternals]:GetVisible()
if col and visible then if col and visible then
local bwidth = self:GetWidthOfButtons() local bwidth = self:GetWidthOfButtons()
if (self.offsetx + bwidth) < self.width then
self.offsetx = bwidth - self.width
else
local scrollamount = self.mousewheelscrollamount local scrollamount = self.mousewheelscrollamount
local dtscrolling = self.dtscrolling local dtscrolling = self.dtscrolling
if dtscrolling then if dtscrolling then
@ -250,6 +247,8 @@ function newobject:mousepressed(x, y, button)
else else
self.offsetx = self.offsetx - scrollamount self.offsetx = self.offsetx - scrollamount
end end
if ((self.offsetx + bwidth) + self.width) < self.width then
self.offsetx = -(bwidth + 10)
end end
end end
end end