updated web.hs