@@ -18,7 +18,7 @@ import qualified Data.Text as T
18import qualified Data.Text.IO as T
18import qualified Data.Text.IO as T
20type HackageAPI =
20type HackageAPI =
21− "users" :> Get '[JSON] [UserSummary]
21+ "users" :> Get '[JSON] [UserSummary]
22 :<|> "user" :> Capture "username" Username :> Get '[JSON] UserDetailed
22 :<|> "user" :> Capture "username" Username :> Get '[JSON] UserDetailed
23 :<|> "packages" :> Get '[JSON] [Package]
23 :<|> "packages" :> Get '[JSON] [Package]