blob: e9e398cfda29a02ba0e2bc8039b30dde2f6dd3b5 (
plain) (
tree)
|
|
let Service = ./service/package.dhall
let Server =
{ kong_app_admin_url : Text
, kong_app_admin_apikey : Text
, services : List Service.Type
}
let Vault = ./../Vault.dhall
let mkServer =
λ(vault : Vault)
→ λ(adminUrl : Text)
→ λ(services : List Service.Type)
→ { kong_app_admin_url = adminUrl
, kong_app_admin_apikey = vault.appAdminApiKey
, services = services
}
: Server
in { Service = Service, Type = Server, mkServer = mkServer }
|