Quick fix for text list control scroll

2017-04-16 02:05:21 +10:00
parent 97a892b370
commit cd4b7a3ee2
2 changed files with 3 additions and 1 deletions
--- a/Classes/TextListControl.lua
+++ b/Classes/TextListControl.lua
@@ -67,7 +67,9 @@ function TextListClass:OnKeyUp(key)
 	end
 	if key == "WHEELDOWN" then
 		self.controls.scrollBar:Scroll(1)
+		return self
 	elseif key == "WHEELUP" then
 		self.controls.scrollBar:Scroll(-1)
+		return self
 	end
 end