From 2cb51e23ba6d881e94f36baa9b8e21b80951880c Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 28 Aug 2016 16:41:22 -0400 Subject: cleanup --- HTTP.hs | 5 ----- 1 file changed, 5 deletions(-) (limited to 'HTTP.hs') diff --git a/HTTP.hs b/HTTP.hs index 10b0d47..f1e9e39 100644 --- a/HTTP.hs +++ b/HTTP.hs @@ -35,9 +35,6 @@ type HttpAPI = :<|> "keysafe" :> V1 :> "stats" :> "countobjects" :> POWParam :> Get '[JSON] (ProofOfWorkRequirement CountResult) -newtype APIVersion = APIVersion Int - deriving (Generic) - type V1 = "v1" newtype Motd = Motd Text @@ -57,8 +54,6 @@ type POWParam = QueryParam "proofofwork" ProofOfWork type ObjectIdent = Capture "ident" StorableObjectIdent -instance ToJSON APIVersion -instance FromJSON APIVersion instance ToJSON Motd instance FromJSON Motd instance ToJSON t => ToJSON (ProofOfWorkRequirement t) -- cgit v1.2.3