Update Publish.hs