doCanvasConfigure :: CanvasId 
                     -> CanvasDimension 
                     -> MainCoroutine () 
doCanvasConfigure = canvasConfigureGenUpdate canvasZoomUpdateAll
doCanvasConfigure :: CanvasId 
                     -> CanvasDimension 
                     -> MainCoroutine ()
doCanvasConfigure = canvasConfigureGenUpdate canvasZoomUpdateAll
doCanvasConfigure = canvasConfigureGenUpdate canvasZoomUpdateAll