diff --git a/Utility/GitLFS.hs b/Utility/GitLFS.hs index 99015baf81..82c4808e39 100644 --- a/Utility/GitLFS.hs +++ b/Utility/GitLFS.hs @@ -47,7 +47,6 @@ module Utility.GitLFS ( Endpoint, guessEndpoint, modifyEndpointRequest, - HostUser, sshDiscoverEndpointCommand, parseSshDiscoverEndpointResponse, @@ -369,9 +368,6 @@ startTransferRequest (Endpoint r) tr = r , requestBody = RequestBodyLBS (encode tr) } --- | "user@host" or just the hostname. -type HostUser = String - addLfsJsonHeaders :: Request -> Request addLfsJsonHeaders r = r { requestHeaders = requestHeaders r ++