fix control scroll for touch.Fixes #574