Update Client.hs