Update fetch.hs