Update Http.hs