if (($gesture_press[:y]-event.y)/($gesture_press[:x]-event.x)).abs > 2 && event.y-$gesture_press[:y] > 5
msg 3, "gesture delete: click-drag right button to the bottom"
w.destroy
if (($gesture_press[:y]-event.y)/($gesture_press[:x]-event.x)).abs > 2 && event.y-$gesture_press[:y] > 5
msg 3, "gesture delete: click-drag right button to the bottom"
w.destroy