activateIdle :: GLUTContext a -> Transform a -> IO ()
activateIdle c t = idleCallback $= Just (Idle.callback c t)
activateIdle :: GLUTContext a -> Transform a -> IO ()
activateIdle c t = idleCallback $= Just (Idle.callback c t)
activateIdle c t = idleCallback $= Just (Idle.callback c t)