aboutsummaryrefslogblamecommitdiffhomepage
path: root/dhall/server/mkServer.dhall
blob: f02055b2dcf113562227f91a8d4d9834b3f115d7 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
















                                         
    let Server = ./Server.dhall

in  let Service = ./service/Service.dhall

in  let Vault = ./../Vault.dhall

in    λ(vault : Vault)
    → λ(adminUrl : Text)
    → λ(services : List Service)
    →   { kong_app_admin_url =
            adminUrl
        , kong_app_admin_apikey =
            vault.appAdminApiKey
        , services =
            services
        }
      : Server