master
{ canvasElement = jsCanvas
Found
eventsChan <- newBroadcastTChanIO let canvas = Canvas > { canvasElement = jsCanvas , canvasEventsChan = eventsChan }
remove it.