強制描画させるのなら、sit-forではなくて redisplay, redraw-frame, redraw-display とかは?