Update YesodWebsockets.hs